CD-Name anezeigen?

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Ttobi
Beiträge: 25
Registriert: 06.03.2005 15:22
Wohnort: Made in Germany (EDDL)
Kontaktdaten:

CD-Name anezeigen?

Beitrag von Ttobi »

Hi, ich schreib grad nen tool das alle Dateien von einer CD ausliest und diese in einer Datenbank speichert(Nur die Namen, damit man weiß wo sich die Dateien befinden). Das klappt auch schon recht gut, allerdings wäre es schön wenn man den CD Namen mit Purebasic auslesen könnte, um ihn nich immer eingeben muss..

Weiß jemand Rat?...
Benutzeravatar
nicolaus
Moderator
Beiträge: 1175
Registriert: 11.09.2004 13:09
Kontaktdaten:

Beitrag von nicolaus »

schau dir am besten mal folgenden link an
http://www.freedb.de/

Gruß,
Nico
Benutzeravatar
bobobo
jaAdmin
Beiträge: 3873
Registriert: 13.09.2004 17:48
Kontaktdaten:

Beitrag von bobobo »

Nikolaus, Es geht nicht um MusikCD'S

Ttobi
guck mal lieber hier
http://www.purebasic.fr/german/viewtopi ... sname#8333
‮pb aktuel 6.2 windoof aktuell und sowas von 10
Ich hab Tinnitus im Auge. Ich seh nur Pfeifen.
Benutzeravatar
Ttobi
Beiträge: 25
Registriert: 06.03.2005 15:22
Wohnort: Made in Germany (EDDL)
Kontaktdaten:

Beitrag von Ttobi »

bobobo hat geschrieben:Nikolaus, Es geht nicht um MusikCD'S

Ttobi
guck mal lieber hier
http://www.purebasic.fr/german/viewtopi ... sname#8333
Genau, vieeelen dank, das war genau Das was ich gesucht habe! :allright:


Edit: Jetzt hab ich noch ein Problem mit der Suche.. Ich hab halt ne Suchfunktion, wie kann ich jetzt noch machen das die "*" als wildcards funktionieren?..

Der Code:

Code: Alles auswählen

SQL1.s = "select * " 
SQL2.s = "from Erweitert " 
SQL3.s = "where Dateien like '"+GetGadgetText(18)+"'" 
event=DatabaseQuery(SQL1+SQL2+SQL3) 

If DatabaseError()<>""
  MessageRequester("Fehler","SQL Fehler!"+Chr(13)+DatabaseError())
ElseIf event<>0
  While NextDatabaseRow()
     AddGadgetItem(17,-1,GetDatabaseString(2)+Chr(10)+GetDatabaseString(1)+Chr(10)+GetDatabaseString(3))
  Wend
Else
   MessageRequester("Fehler","Query ergab einen fehler")
EndIf
Benutzeravatar
progger
Beiträge: 15
Registriert: 12.04.2005 11:03

Beitrag von progger »

In SQL benutzt man % anstatt *.

Code: Alles auswählen

-> where Dateien like '%"+GetGadgetText(18)+"%'"
bzw. wenn die * in GetGadgetText enthalten, einfach durch % ersetzen (nur am Anfang oder Ende des Strings)
Benutzeravatar
Ttobi
Beiträge: 25
Registriert: 06.03.2005 15:22
Wohnort: Made in Germany (EDDL)
Kontaktdaten:

Beitrag von Ttobi »

alles klar vielen dank =)
Antworten