Visitar/Descargar pagina web varias veces

Iniciado por BgCRaCK, 26 Febrero 2011, 15:28 PM

0 Miembros y 1 Visitante están viendo este tema.

BgCRaCK

Hola a todos este es mi primer post y agradeceré cualquier ayuda o sugerencia.

Tengo el siguiente problema: intento conseguir unas estadísticas de una página web, en concreto el numero de votos por usuario y lo que pretendo es visualizar las puntuaciones en mi formulario VB ( 2003 ).
Seleccionamos por ejemplo 3 usuarios y hacemos tantas visitas a la página como sea necesario hasta que encuentro los 3.
La parte mala es que la pagina ofrece un RANDOM de usuarios , es por eso que necesito visitar la pagina varias veces hasta dar con todos los usuarios.

--------
Mi problema es que el archivo no suele descargarse :S a lo mejor una vez.
He probado borrando el archivo comprobando si existe o no.
---------

SOLUCIÓNADO  :rolleyes:

Código (vbnet) [Seleccionar]
Private Function LeerTextoWeb(ByVal pURL As String) As String

        Dim vSolicitud As WebRequest = WebRequest.Create(pURL)
        Dim vRespuesta As WebResponse = vSolicitud.GetResponse()
        Dim vStream As StreamReader = New StreamReader(vRespuesta.GetResponseStream())

        Dim vStr As String = vStream.ReadToEnd().Trim

        vRespuesta.Close()
        vStream.Close()

        Return vStr
    End


Gracias   :D
Cita de: ChimoC en  2 Febrero 2011, 22:38 PM
Con tu filosofía (desde mi punto de vista) sobran los foros...ya que como a ti te cuesta, pues que los demás se la pelen...
ChimoC
WLAN/JAZZ_XXXX WPA

http://www.xand_r.byethost10.com/Index.html

Edu

No es mejor usar el WebBrowser? para luego hacer lo de WebBrowser.document.body.inhertext algo asi

BgCRaCK

#2
ultimamente no estoy fino..

voy a probar con

Código (vbnet) [Seleccionar]
For Each Linea As String In WebBrowser.DocumentText
next


si me sale algo postearé
Cita de: ChimoC en  2 Febrero 2011, 22:38 PM
Con tu filosofía (desde mi punto de vista) sobran los foros...ya que como a ti te cuesta, pues que los demás se la pelen...
ChimoC
WLAN/JAZZ_XXXX WPA

http://www.xand_r.byethost10.com/Index.html

seba123neo

Hola, no hace falta descargar un archivo para leer el texto de la web, lo podes hacer desde un string en memoria.

Código (vbnet) [Seleccionar]
Private Function LeerTextoWeb(ByVal pURL As String) As String

        Dim vSolicitud As WebRequest = WebRequest.Create(pURL)
        Dim vRespuesta As WebResponse = vSolicitud.GetResponse()
        Dim vStream As StreamReader = New StreamReader(vRespuesta.GetResponseStream())

        Dim vStr As String = vStream.ReadToEnd().Trim

        vRespuesta.Close()
        vStream.Close()

        Return vStr
    End Function


esta funcion devuevle un string con todo el texto de la URL que le pases como parametro.

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

BgCRaCK

Bravo, esta respuesta es la que no se encuentra en 'G :P GLe' . Muchas gracias a todos por leer y participar.
Me la guardo en el HDD Neuronal.

Un saludo a este tremendo foro.
Cita de: ChimoC en  2 Febrero 2011, 22:38 PM
Con tu filosofía (desde mi punto de vista) sobran los foros...ya que como a ti te cuesta, pues que los demás se la pelen...
ChimoC
WLAN/JAZZ_XXXX WPA

http://www.xand_r.byethost10.com/Index.html