InetGet doesn't return immediately with (..,1,1) param

[KJohn]

Progress(-1, "Attempting to connect... ")
    FileDelete(@TempDir &"\lc.cfg")
    InetGet( "VALID ADDRESS of an image", @TempDir &"\lc.cfg", 1,1)
    $timer=TimerInit()
    MsgBox(0,"check","debug")
               ;WAITING
    While @InetGetBytesRead==-1
        sleep(500)
        Progress(TimerDiff($timer),"Attempting to connect... ("&90-Round(TimerDiff($timer))&" secs to timeout)")
        If TimerDiff($timer)>90 Then ExitLoop
    WEnd
               ;IF CONNECTION SUCCESSFUL
    $timer=TimerInit()
    While @InetGetBytesRead<>-1 And @InetGetActive==1
        sleep(50)
        If TimerDiff($timer)>2000 Then ExitLoop
    WEnd
    InetGet("abort")
    
    FileDelete(@TempDir &"\lc.cfg")

The InetGet function is supposed to return rite (see parameters)? MsgBox(0,"check","debug") line gets executed only AFTER I click on 'allow' in my firewall program. I need a 90 second timeout to be displayed when an internet connection is not available or the user blocks it using a firewall.

Progress() is a UDF (no problems there).

Any solutions?

[The Kandie Man]

It is not returning because it hasn't made a connection. The InetGet() function will return immediately once it has established a connection and has begun receiving data. It hasn't established the connection because your firewall keeps blocking it when it tries to do so. The best way around this is to simply not use the firewall or have it automatically allow the connection. There are also some udfs that have been written on the forum as alternatives to inetget. I will look for them and post an update.

EDIT:

This looks promising:

http://www.autoitscript.com/forum/index.ph...amp;hl=protocol

Edited December 7, 2006 by The Kandie Man