_GetIP crash

[StungStang]

Hi to all, i have a strange error. For example if i try this simple code:

MsgBox(0,"My IP",_GetIP())

If my connection is down and i try to run that, the script crashes and i have to waith much more than 1 minutes before the script is unlocked with the message "-1". Can i set a timeout to _GetIp()? This is very annoying =(

Hi!

Edited August 13, 2011 by StungStang

[JohnOne]

Dont think it works any more

There are others in the example forum

[StungStang]

I have just tried but it's the same problem. It took too much time to give me the -1, if i voluntary turn off my connection to test the function, in this time the script just freeze.

For example i use get ip to know if the user can use the internet connection, to download any file:

If _GetIP() = -1 Then
    ;Download a file
Else
    MsgBox(16,"Error","Can't connect to internet!")
EndIf

In the long time that _GetIP give me -1 the script just freeze =(

Hi!

[JohnOne]

Try the ones in

[StungStang]

The same, it give too much time to return -1, in this time the script freeze =(

[JohnOne]

returns after 250 ms if it fails. That's not long.

[StungStang]

Your scipt tell the internal ip for ex. 192.168.0.1, _GetIP give the external ip. For example if i connect my pc with the wifi, and i disconnect my adsl from the router pannel, the wifi connection is still alive but of course i cant connect to internt. In this case _GetIP() fail, give -1 afer 1 minutes, in this time the script freeze =).

For example if i launch the script and suddenly my router disconnect from internet...if i controll the ip with _GetIP, it took too much time to say -1, in this time freeze =)

[JohnOne]

Func _GetIP2()
    Local $bRead = InetRead("http://checkip.dyndns.org/")
    If @error Then $bRead = InetRead("http://automation.whatismyip.com/n09230945.asp")
    If Not @error Then
        Local $aIp = StringRegExp(BinaryToString($bRead),'\d{1,3}(\.\d{1,3}){3}',2)
        If Not @error Then Return $aIp[0]
    EndIf
    Return SetError(1,0,'0.0.0.0')
EndFunc   ;==>_GetIP2

Works for me, through Wireless LAN, wired LAN, usb phone Wired and bluetooth phone.

[StungStang]

It's work well if your connection are on, but if you are connect through WI-FI, and you would test the _GetIp better try this.

Connect on wifi, disconnect your router from internet like this:

As you can see the wifi connection with the router are still alive, but of course you cant surf on internet . Now try to run _GetIP(). It's just freeze for a long time before to say -11

If you can try...try =D

[JohnOne]

Yes because there is no TimeOut.

Use a ping function to see if you are connected first.

[StungStang]

Witch site can use for have a secure ping?...For example google don't respond always =)

Can you give an example? =)

Thanks for help =)

Edited August 13, 2011 by StungStang

[JohnOne]

Use a few, Microsoft, google, yahoo etc.. Its unlikely that they would all be down at the same time.

EDIT:

If its just for personal use then its a good idea to use your isp because if they are off line then you probably are too.

Edited August 13, 2011 by JohnOne

[StungStang]

For example as i have just say google dont respond always at the ping.

How i can controll if i am connected to internet with the ping function? It's good this soluction:

$Ping = Ping("http://www.google.com")
If $Ping <> 0 Then
MsgBox (0,"","Connected")
EndIf

Is a secure way to know if i am connected to internet?...Or you have a better way to do that?

[JohnOne]

Use a few, Microsoft, google, yahoo etc.. Its unlikely that they would all be down at the same time.

EDIT:

If its just for personal use then its a good idea to use your isp because if they are off line then you probably are too.

[monoscout999]

For example as i have just say google dont respond always at the ping.

How i can controll if i am connected to internet with the ping function? It's good this soluction:

$Ping = Ping("http://www.google.com")
If $Ping <> 0 Then
MsgBox (0,"","Connected")
EndIf

Is a secure way to know if i am connected to internet?...Or you have a better way to do that?

acording this script i am offline error code 4,

this is the correct way.

$Ping = Ping("www.google.com")
If $Ping <> 0 Then
MsgBox (0,"","Connected")
EndIf

[StungStang]

acording this script i am offline error code 4,

this is the correct way.

$Ping = Ping("www.google.com")
If $Ping <> 0 Then
MsgBox (0,"","Connected")
EndIf

Whitout http://...why?

it's true with my code it say somethimes offline =)

[BrewManNH]

You can't ping to HTTP, you have to use just the URL or an IP address. That's just how it works.

[guinness]

my version works >> perhaps you're being blocked or something?!