Seite 1 von 1

Text-Datei durchsuchen...

Verfasst: 26.03.2006 21:12
von onny
Hi, habe schon das Forum und das PB-Archiv durchsucht aber nichts gefunden...

Also folgendes:

EineTextdatei soll durchsucht werden ist Ergebnis = "blabla" (also wenn in der Datei blabla steht) dann soll dies und das geschehen...
Ich meine nicht Ergebnis$ = Trim(ReadString()), denn das bla bla kann überall in der Datei sein und muss gesucht werden!

Vielen Dank schon im Vorraus!
Ps: "blabla" :D

Verfasst: 26.03.2006 21:28
von walker
Hi,

wenn es sich um eine reine Textdatei handelt, kannst Du die Datei zeilenweise mit

Code: Alles auswählen

ReadString()
lesen und jedesmal nach dem Begriff durchsuchen.

Sieh Dir mal die PB-Hilfe dazu an

Re: Text-Datei durchsuchen...

Verfasst: 26.03.2006 21:29
von Kiffi
FindString() ist der Befehl, den Du suchst.

Für PB3.94:

Code: Alles auswählen

FF = OpenFile(#PB_Any, DeineDatei$)
If FF
  While Eof(FF) = 0
    EingelesenerString$=ReadString()
    If FindString(EingelesenerString$, "blabla", 1)
      ; Here we are!
    EndIf
  Wend
  CloseFile(FF)
EndIf
Für PB4:

Code: Alles auswählen

FF = OpenFile(#PB_Any, DeineDatei$)
If FF
  While Eof(FF) = 0
    EingelesenerString$=ReadString(FF)
    If FindString(EingelesenerString$, "blabla", 1)
      ; Here we are!
    EndIf
  Wend
  CloseFile(FF)
EndIf
Grüße ... Kiffi

Verfasst: 26.03.2006 21:41
von onny
vielen dank