Verifing if the internet is on

[Vinians2006]

How can I verify if the internet is on and so tell the user to connect before a download for example?
Thanks

 

[NJDude]

You need to use the NETWORK library:

Dim sSocket As ServerSocket

If sSocket.IsInitialized = False Then
  
   sSocket.Initialize(8080, "sSocket")
   sSocket.Close
       
End If

If sSocket.GetMyIP = "127.0.0.1" Then

    Msgbox("No Internet connection detected", "")
                
End If

 

[Jim Brown]

See this post

http://www.b4x.com/forum/basic4andr...844-internet-connection-status.html#post72396