Possible to execute a func in a loop?

[Jabberwock]

Hi, I was wondering if it's possible to execute a func in a loop, i have it setup to where

If $msg = $connectitem Then
            $g_IP = InputBox("EQC Client","Enter The Server IP Address",@IPADDRESS1,"",300,200)
            $g_port = 33891
            Sleep(500)
            $socket = TCPConnect( $g_IP, $g_port )
            ElseIf $socket = -1 Then
            MsgBox(0, "Error!", "No response at " & $g_IP & " on port " & $g_port )
                EndIf

it just keeps spamming message boxes =/

Or mabye somthing else that could only popup the msg box once and go on?

[SlimShady]

hope this helps you.

If $msg = $connectitem Then
            $g_IP = InputBox("EQC Client","Enter The Server IP Address",@IPADDRESS1,"",300,200)
            $g_port = 33891
            Sleep(500)
            $socket = TCPConnect( $g_IP, $g_port )
            If $socket = -1 Then
               MsgBox(0, "Error!", "No response at " & $g_IP & " on port " & $g_port )
            Else
               ExitLoop
            EndIf
         EndIf

[Jabberwock]

well, this only pops up one msg box if it cannot connect but if it can connect, it exits =/ is there somhting to only apply the ExitLoop when "$socket = -1" ?

Edited December 14, 2005 by Jabberwock

[SpookMeister]

Do you have a main loop that you aren't showing us? or is your script simply finishing after the last statement?

Stick a msgbox at the bottom of your code to see for sure.

[Jabberwock]

Well...i thought it was pretty self explanatory that it was running in a loop? due to my topic name? and also...

$connectitem which is executed when a button is pressed

[jefhal]

is there somhting to only apply the ExitLoop when "$socket = -1" ?

Why not:

If $msg = $connectitem Then
            $g_IP = InputBox("EQC Client","Enter The Server IP Address",@IPADDRESS1,"",300,200)
            $g_port = 33891
            Sleep(500)
            $socket = TCPConnect( $g_IP, $g_port )
            If $socket = -1 Then
               MsgBox(0, "Error!", "No response at " & $g_IP & " on port " & $g_port )
                   ExitLoop
            Else
                    tooltip("Whoopeee!")
            EndIf
         EndIf

[Jabberwock]

That dosn't work, it's basically the same thing the other person suggested, it just pops up the msgbox then exits

[jefhal]

That dosn't work, it's basically the same thing the other person suggested, it just pops up the msgbox then exits

No, it only exits the loop IF $socket = -1

The other one exits the loop IF $socket <> -1

Big difference. Maybe you could explain what you really want?

[Jabberwock]

pretty much i want it to let the end user know if there's a problem connecting, pop up a msg box, and mabye give the user another chance to connect, with this code and no server online it will popup the msg box then exit,

If $msg = $connectitem Then
            $g_IP = InputBox("EQC Client","Enter The Server IP Address",@IPADDRESS1,"",300,200)
            $g_port = 33891
            Sleep(500)
            $socket = TCPConnect( $g_IP, $g_port )
            If $socket = -1 Then
               MsgBox(0, "Error!", "No response at " & $g_IP & " on port " & $g_port )
                   ExitLoop
            Else
                   ;tooltip("Whoopeee!"); don't really need this tried it with anyway, just pops up forever if there's an actual server
            EndIf
         EndIf

the $connectitem is part of a menu

$connectitem = GuiCtrlCreateMenuitem ("Connect",$filemenu)

and

If $msg = $connectitem Then

is in a

While 1
   $msg = GUIGetMsg()

loop

[jefhal]

Without your complete code it's way too much work to troubleshoot your code, but here's my last effort:

If $msg = $connectitem Then
            $g_IP = InputBox("EQC Client","Enter The Server IP Address",@IPADDRESS1,"",300,200)
            $g_port = 33891
            Sleep(500)
            $socket = TCPConnect( $g_IP, $g_port )
            If $socket = -1 Then
               MsgBox(0, "Error!", "No response at " & $g_IP & " on port " & $g_port,3 ); goes away after 3 seconds
            Else
                   tooltip("Whoopeee")
                   sleep(3000)  ; tooltip goes away after 3 seconds
                   tooltip("")
            EndIf
         EndIf

[Jabberwock]

i changed a few things around, and when i added this code it worked, i'm not sure why it works now, i even tested it without the tooltip and without the msg box disappearing after 3 seconds, but thanks.