Recuperar texto del explorer

15/07/2004 - 17:10 por Lancer | Informe spam
Buenas tardes,

Tengo hecha una pequeña aplicación que utilizando un
servicio web me devolvía mi IP pública y me la enviaba a
mi correo para poder acceder desde fuera.

Desde hace dos días ha dejado de funcionar y el error es
que no encuentra la dirección de la URL del servicio web.

El servicio web estaba en la dirección
http://www.showmyip.com/soap/server.php?wsdl y al parecer
ha dejado de funcionar, pero si entro en www.showmyip.com,
me devuelve una página con la IP pública de mi equipo.

Me gustaría saber si alguien conoce la manera de capturar
el texto que se muestra en esa página web, para poder
tratarlo.

Muchas gracias.

Preguntas similare

Leer las respuestas

#1 Lancer
15/07/2004 - 19:56 | Informe spam
Ya lo he solucionado, este es el código de la función, se
admiten sugerencias

Dim myClient As WebClient = New WebClient
Dim file As StreamReader
Dim line() As String
Try
' Create an instance of StreamReader to read
from a file.
Dim sr As StreamReader = New StreamReader
(myClient.OpenRead("http://www.showmyip.com/simple"))
'Do
'Solo lo lleemos una vez ya que la ip es lo
primero que devuelve
line = Split(sr.ReadLine(), " ")
Console.WriteLine(line(0))
'Loop Until line Is Nothing
sr.Close()
Return line(0)
Catch E As Exception
' Let the user know what went wrong.
Console.WriteLine("No se pudo leer la
dirección.")
Console.WriteLine(E.Message)
Finally
Cliente.Dispose()
End Try
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida