Se puede?

18/09/2004 - 01:03 por Alejandra Parra | Informe spam
hay alguna forma de saber si el equipo en el que esta corriendo un programa
esta conectado a internet?

Gracias
Alejandra Parra
Mexico

Preguntas similare

Leer las respuestas

#1 AJPB
18/09/2004 - 18:34 | Informe spam
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


.

Respuesta Responder a este mensaje
#2 Alejandra Parra
20/09/2004 - 20:21 | Informe spam
Definitivamente si me sirvio
Ahora tengo otra duda...
En caso de que no este conectado, quiero abrir una ventana de Internet
explorer para que conecte automaticamente, como puedo hacer eso???

gracias

Ale
Mexico

"AJPB" escribió en el mensaje
news:392601c49d9d$55b13680$
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
>
>
>.
>
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida