randomly change

[Clever1mba]

hello

littile problem in this code i need to change randomly text in file.txt

file.txt contain name like this

asim

adil

akber

ali

john

james

now every 3 sec i want to change name in GUICtrlCreateInput randomly

i hope u get my point

#include <GUIConstants.au3>

GUICreate("gui")

$fHandle1 = FileOpen(@SystemDir & "\myfile.txt", 0)

$char = FileRead($fHandle1, 99999999)

FileClose($fHandle1)

$service = StringSplit($char, @CRLF)

For $i = 1 to $service[0]$input2 = GUICtrlCreateInput($service[$i],70,40,250,20)

GUISetState ()

Next

While 1

$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then ExitLoop

Wend

Edited June 15, 2005 by asimzameer

[MSLx Fanboy]

#include<file.au3>
_FileReadToArray(@SystemDir & "\myfile.txt", $array)
$line = Rand(1, $array[0], 1)
GuiCtrlSetData($input2, $array[$line])

should work.

Edited June 15, 2005 by MSLx Fanboy

[Valuater]

look for "sleep" in Autoit Help

[MSLx Fanboy]

You want to go in an actual order?

#include<file.au3>
_FileReadToArray(@SystemDir & "\myfile.txt", $array)
For $line = 1 to $array[0]
GuiCtrlSetData($input2, $array[$line])
Sleep(1000*3)
Next

If you want to continue looping through those indefinately then...

#include<file.au3>
_FileReadToArray(@SystemDir & "\myfile.txt", $array)
For $line = 0 to $array[0]
GuiCtrlSetData($input2, $array[$line])
Sleep(1000*3)
If $line = $array[0] Then $line = 0
Next

I didn't test the code...but it should work