Comprobar si tengo conexión a internet

[f_murciano]

Hola a tod@s:

¿Como puedo comprobar si tengo o no conexión a internet desde mi aplicación en VB?

Muchas gracias a tod@s.

Un saludo.

[f_murciano]

encontré esto despues de poner el mensaje:

http://www.forosdelweb.com/showthrea...exion+internet

Aun no lo probé, ya os contare.

[ramoncito]

Colocas eso en las declaraciones globales

Código:

Private Const FLAG_ICC_FORCE_CONNECTION = &H1
Private Declare Function InternetCheckConnection Lib "wininet.dll" Alias "InternetCheckConnectionA" (ByVal lpszUrl As String, ByVal dwFlags As Long, ByVal dwReserved As Long) As Long

y luego en un boton o en un timer o donde quieras ponerlo colocas este codigo

Pudiendo ip tomar el valor de

ip = "200.123.456.789"

ip = "http://www.tupagina.com"

ip="nombre_maquina" (eso si esta dentro de tu red)

Código:

If InternetCheckConnection(ip, FLAG_ICC_FORCE_CONNECTION, 0&) = 1 Then
    MsgBox "Error"
Else
    MsgBox "Listo"
End If

[f_murciano]

Gracias por la respuesta... voy a probarlo y te cuento.