Se puede?

Si te sirve me avisas?. Gracias

Public Function IsConnectionAvailable() As Boolean
' Devuelve True si hay conexion

' Sustituye www.misite.com con un site que
' esta garantizado estar siempre online
' por ejemplo microsoft.com ( bueno ni tanto ) :P

Dim objUrl As New System.Uri("http://www.misite.com/")

Dim objWebReq As System.Net.WebRequest
objWebReq = System.Net.WebRequest.Create(objUrl)
Dim objResp As System.Net.WebResponse
Try
' Intenta tener respuesta y manda True
objResp = objWebReq.GetResponse
objResp.Close()
objWebReq = Nothing
Return True
Catch ex As Exception
' Error, sale y devuelve False
objResp.Close()
objWebReq = Nothing
Return False
End Try

La funcion la usas asi:

If IsConnectionAvailable() = True Then
MessageBox.Show("Estas conectado!")
End If

hay alguna forma de saber si el equipo en el que esta

corriendo un programa

esta conectado a internet?

Gracias
Alejandra Parra
Mexico


.