.txt mit AutoIt bearbeiten

  • Hi :)

    vorrausgehend zu diesem Thema ist folgender Code

    [autoit]

    $file=FileOpen("a.txt",0) ; a.txt ist die Liste der Wortgruppen
    $filedata=FileRead($file)
    $textarray=StringSplit($filedata,@CRLF,1)

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

    Send($textarray[Random(1,UBound($textarray)-1,1)]) ; gibt eine zufällige Wortgruppe aus :)

    [/autoit]

    aus diesem Thead: autoit.de/index.php?page=Thread&postID=358331

    Das mit dem Senden hat funktioniert einwandfrei :)

    Aber jetzt möchte ich nachdem die Wortgruppe gesendet wurde diese aus dem Textdoument löschen..

    Wie mach ich das am besten?

    Mein Ansatz:

    [autoit]

    $text=$textarray[Random(1,UBound($textarray)-1,1)]
    sleep(100)
    Send($text)
    sleep(100)
    # $text aus der Liste löschen #

    [/autoit]

    Und das # $text aus der Liste löschen # ist das was ich nicht schaffe :D

  • Ungetestet sollte aber so gehen:

    [autoit]

    $file=FileOpen("a.txt",0)
    $filedata=FileRead($file)
    FileClose($file)

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

    $textarray=StringSplit($filedata,@CRLF,1)

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

    $id = Random(1,UBound($textarray)-1,1)
    Send($textarray[$id])
    _ArrayDelete($textarray, $id)
    $string = _ArrayToString($textarray,@CRLF)

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

    $file=FileOpen("a.txt",2)
    FileWrite($file,$string)
    FileClose($file)

    [/autoit]

    Andy hat mir ein Schnitzel gebacken aber da war ein Raupi drauf und bevor Oscar das Bugfixen konnte kam Alina und gab mir ein AspirinJunkie.