TXT Datei nach bestimmtem Wort durchsuchen und rausschreiben.

  • Heyho,

    wie mache ich das, dass alle Zeilen aus einer txt. rausgeschrieben werden, die das gesuchte Wort beinhalten?

    zb. das gesuchte Wort ist: hello

    Die TXT Datei:

    eegervfvsvfh
    jfshgfgfhfhello ; also diese Zeile
    uhfufhdfufdhf
    dfheuhhfdnbhello ; diese Zeile
    hellohjufdhufhjs ; und diese Zeile

    Ist das irgendwie möglich?

    2 Mal editiert, zuletzt von Desaster (8. April 2009 um 01:31)

  • Hi.

    [autoit]


    #include <File.au3>

    [/autoit][autoit][/autoit][autoit]

    $String = ""

    [/autoit][autoit][/autoit][autoit]

    $Open = FileOpen("File.txt", 0)

    [/autoit][autoit][/autoit][autoit]

    For $i = 1 To _FileCountLines("File.txt")
    $Line = FileReadLine($Open, $i)
    If StringInStr($Line, "hello") Then $String &=$i &". "& $Line & @CRLF
    Next

    [/autoit][autoit][/autoit][autoit]

    MsgBox(64,"Finished",$String)

    [/autoit]

    Untested... Theoretisch sollte es aber gehen :o)

    Lg,

    Lenny

    Jaja, Moo does the Cow!

  • Hab mir mal die freiheit genommen es zu testen ;) sieht schön aus funktioniert auch. FileClose fehlt aber, weiss nur nicht ob es notwendig ist, da ich mit damit noch nicht so wirklich beschäftigt habe.