Repeat Inputbox until "finish" is clicked

[NiitriiX]

Hello,

so im new to auto it and have been playing around a bit.

What i am looking to do is creat and input box, that keeps opening until finish is clicked. E.g i want to add 4 url's to a .txt file, if i click OK i get a new input box with a different veriable, and so on untill i click finish.

what i have so far works like a charm !! however i have to prespecifie how many links can be inputed...

; Links Input
   $var1 = InputBox("Your Link....", "1", "type the url here", "", 500, 100)
   $var2 = InputBox("Your Link....", "2", "type the url here", "", 500, 100)
   $var3 = InputBox("Your Link....", "3", "type the url here", "", 500, 100)
   $var4 = InputBox("Your Link....", "4", "type the url here", "", 500, 100)
   $var5 = InputBox("Your Link....", "5", "type the url here", "", 500, 100)
; Save to Text file
   FileWrite("url.txt", $var1 & @CRLF)
   FileWrite("url.txt", $var2 & @CRLF)
   FileWrite("url.txt", $var3 & @CRLF)
   FileWrite("url.txt", $var4 & @CRLF)
   FileWrite("url.txt", $var5 & @CRLF)

will i have to creat a GUI with 3 buttons and give them a value of say, click NEXT will repeat with +1 to the variable and click FINISH will end the script??

thanks in advance for any help !!

regards,

NiitriiX

[NiitriiX]

i was just thinking couold this be done with a loop??

so loop the input box with a +1 variable and if cancel is pressed the loop ends??

[JLogan3o13]

Hi, NiitriiX, welcome to the forum. You could do something like this to loop through the Inputboxes. This would allow you to easily add more at some point if you would like.

Local $var[5]

For $element in $var
  $x = InputBox("Your Link....", "1", "type the url here", "", 500, 100)
  FileWrite("url.txt", $x & @CRLF)
Next

[NiitriiX]

Thanx for the reply JLogan3o13,

i just tried this and it works but it only allows for a max of 5 inputs, and even if cancel is clicked another input box opens until the 5 variables have been used.

ok so sometimes i will need to add maybe 20 links and sometimes only 2 or 3... is their a way of doing this?

Edited June 5, 2012 by NiitriiX

[JLogan3o13]

To change the number, just change the first line. You can also catch the @error if you would like to stop when someone clicks Cancel.

Local $var[15]

For $element in $var
  $x = InputBox("Your Link....", "1", "type the url here", "", 500, 100)
  If @error Then ExitLoop
  FileWrite("url.txt", $x & @CRLF)
Next

[NiitriiX]

WOWOWOW,

perfect buddy thanx a lot !!

works like a charm !

Edited June 5, 2012 by NiitriiX

[JLogan3o13]

Put the @error right where I have it in post #5 above. If someone clicks cancel, it will exit out of the For loop. If you have more code after the For loop, THAT will continue to process. If not, the script will end. Alternatively, if you do not know how many url's you will capture each time, do a While instead of a For loop:

While 1
 
$x = InputBox("Your Link....", "1", "type the url here", "", 500, 100)
  If @error Then ExitLoop
FileWrite("url.txt", $x & @CRLF)
 
WEnd

[somdcomputerguy]

Here's another way of doing it. I don't get how FileWrite is working, it's not used correctly. Unless you have more code that has the FileOpen and FileClose commands.

$file = FileOpen("url.txt", 1)
While 1
    $var = InputBox("Your Link....", "Type the url here", "type the url here", "", 500, 150)
    Sleep(10)
    FileWrite($file, $var & @CRLF)
    Sleep(10)
    If MsgBox(36, "", "Do it again?") = 7 Then ExitLoop ; 36 adds yes and no buttons, the no button = 7
WEnd
FileClose($file)

[somdcomputerguy]

Thinking about about it, the @error line after the InputBox is a good idea that JLogan3o13 had.

[BrewManNH]

I don't get how FileWrite is working, it's not used correctly. Unless you have more code that has the FileOpen and FileClose commands.

From the help file for FileWrite

If a filename is given rather than a file handle, the file will be opened and closed during the function call. For parsing large text files this will be much slower than using filehandles. However, filename will be created if it does not already exist.

For small files like this, not using FileOpen/FileClose shouldn't affect the speed much.

BTW. With an InputBox, it's going to pause the script until it is processed or closed so there's no need to sleep the loop.

[somdcomputerguy]

Thanks for pointing that out. Time for me to read the Good Book again! I'm pretty lazy and like to Sleep() a lot, I guess that shows up in my code..