So ich habe ein mehr oder weniger großes Problem.
Also ich habe in einer .txt Datei ICQ Nummern mit Passwort nach folgendem Muster gespeichert.
123456789:abcde
9879879:musterpw
55533322:test
Vor dem ":" die UIN und danach das Passwort. Es gibt unterschiedliche lange UINS.
So ich habe nun ein Script, dass soll mir in einer Msg Box die UIN, dann ok klicken, dann das Passwort in einer neues MsgBox zeigen.
Und das Reihe für Reihe.
Bei Reihe 1 gibt er z.B. aus
123456789 (ok klick)
abcde (ok ende)
Wenn er nur einer Reihe abfragen soll klappt das problemlos, aber als ich das Script dann so modifiziert habe,dass es mehrer Reihen macht,
klappte es nicht mehr.
Script für nur eine Abfrage:
$uinlist= FileOpen("icquins.txt", 0)
[/autoit][autoit][/autoit][autoit]If $uinlist = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
$x = 1
$uinb = ""
For $i = 1 to 10
$uina = FileRead($uinlist,1)
If @error = -1 Then ExitLoop
If StringisDigit($uina) Then
Else
;Wenn UINs unterschiedlich lang sind, dann brich Anneinanderreihen des Strings ab
If $i = 6 then ExitLoop
If $i = 7 then Exitloop
If $i = 8 then Exitloop
If $i = 9 then Exitloop
EndIf
;String wird in jedem Durchlauf ein Zeichen länger
$uinb = $uinb & $uina
Next
;Passwort herausfiltern (Anfang abschneiden)
$line = FileReadLine ($uinlist,1)
$pass = StringTrimLeft ($line,$i)
MsgBox (0, "UIN:",$uinb)
MsgBox (0, "PASS:",$pass)
FileClose($uinlist)
[/autoit]Wie kann ich das Script nun so abändern das es Reihe für Reihe die UINs+Passwörter abfragt und ausgibt ?
Vielen Dank schonmal im vorraus