diikee Posted July 30, 2008 Share Posted July 30, 2008 $ip = InputBox("Get Ip Address", "Enter 1 or more IP Address separated by a comma: ") If $ip = "" Then Exit $ip = StringSplit($ip, ",") For $i = 1 to 20 Step 1 For $x = 1 To $ip[0] $oIE = _IECreate($ip[$x]) Sleep(2000) $file = FileOpen("logfile_" &@MDAY &@MON &@HOUR &@MIN &"_" &$ip[$x] & ".txt", 9) If $file = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf Sleep(2000) FileWrite($file, "SQA Testing IP#: " & $ip[$x] & @CRLF) ToolTip('Testing ' & $ip[$x], 0, 0) win() Sleep(2000) FileWrite($file,"SQA Testing Finished at:"& @MDAY & @MON & @YEAR & @HOUR & @MIN &@CRLF) Sleep(2000) FileClose($file) Sleep(2000) $oIE = "" Next NextWith the script above, I can execute the win() for one IP after another (comma separated) which is great.Question1:Now, I want to go another notch higher and execute win() on all ip's (comma separated). 1 - bring the first one to the top, click a button then move it to the back2 - bring the second one to the top, click the same button in [1] move it backbasically swapping back and forth for all browsers. Question2:I want to schedule my script so that after 8pm, it executes win() on just 2 of the 4 (comma separated) ip's.how can I do this?? Link to comment Share on other sites More sharing options...
anixon Posted July 30, 2008 Share Posted July 30, 2008 $ip = InputBox("Get Ip Address", "Enter 1 or more IP Address separated by a comma: ") If $ip = "" Then Exit $ip = StringSplit($ip, ",") For $i = 1 to 20 Step 1 For $x = 1 To $ip[0] $oIE = _IECreate($ip[$x]) Sleep(2000) $file = FileOpen("logfile_" &@MDAY &@MON &@HOUR &@MIN &"_" &$ip[$x] & ".txt", 9) If $file = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf Sleep(2000) FileWrite($file, "SQA Testing IP#: " & $ip[$x] & @CRLF) ToolTip('Testing ' & $ip[$x], 0, 0) win() Sleep(2000) FileWrite($file,"SQA Testing Finished at:"& @MDAY & @MON & @YEAR & @HOUR & @MIN &@CRLF) Sleep(2000) FileClose($file) Sleep(2000) $oIE = "" Next Next With the script above, I can execute the win() for one IP after another (comma separated) which is great. Question1: Now, I want to go another notch higher and execute win() on all ip's (comma separated). 1 - bring the first one to the top, click a button then move it to the back 2 - bring the second one to the top, click the same button in [1] move it back basically swapping back and forth for all browsers. Question2: I want to schedule my script so that after 8pm, it executes win() on just 2 of the 4 (comma separated) ip's. how can I do this?? ;//Process at 8PM $PingIP2 = "192.168.0.1" $PingDelay2 = 750 If @HOUR = 20 And $OldHour = 19 Then Ping($PingIP2, $PingDelay2) EndIf $OldHour = @HOUR You can create a Function that includes an array of the addresses to Ping then sequentially read the array assign the value to a variable then individually ping each address and then repeat the routine by wrapping it in a For Next Loop. You can error trap Nil responses to each ping and write the detail to a txt file. There may be more elegant ways of doing it but I am sure with this approach you can develop a script that meets with your requirements. Ant.. Link to comment Share on other sites More sharing options...
diikee Posted July 30, 2008 Author Share Posted July 30, 2008 anyone for Q1??? Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now