gui freezes on tcpconect

[jvds]

Hello

when I try to do a tcp conection to an Ip that is online but with a closed port, my gui freezes, is there a way arround that I could check if the port is not active or a way to avoid the freezing??

I leave you with an example code

thanks

AdlibRegister("_500", 500)
AdlibRegister("_1000", 1000)
$gui = GUICreate("test",200,100,-1,-1)
$connect = GUICtrlCreateButton("connect", 10, 10, 50, 18)
GUISetState(@SW_SHOW,$gui)
while 1
    $gMsg = GUIGetMsg()
    Switch $gMsg
        case -3
            Exit
        Case $connect
            ConsoleWrite("TCPConnect"&@LF)
            TCPStartup()
            $Socket = TCPConnect("192.168.1.6", '5000' )
            ConsoleWrite ("$Socket= "&$Socket&@lf)
            TCPShutdown()
    EndSwitch
WEnd
func _500()
    ConsoleWrite("!500"&@LF)
EndFunc
func _1000()
    ConsoleWrite("-1000"&@LF)
EndFunc

 

[NateF]

$test = Ping(192.168.1.6:5000)
If $test = 0 then

      0 = (no response)

 

Edited July 7, 2014 by NateF

[funkey]

You could use my socket UDF. There is a function called _TCPConnect() with a timeout parameter.

http://www.autoit.de/index.php?page=Attachment&attachmentID=24567&h=ca64bd1c55936912df877c3045756d05bda42374