Como leer datos desde una web?

Iniciado por fernan3001, 15 Septiembre 2005, 22:55 PM

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

fernan3001

Hola, mi pregunta era que si se puede llegar a leer datos de una web. Por ejemplo de un txt colgado en internet.

programatrix

Si, si sabes programar puedes hasta subirlos  ;D

Manibal_man

Es facilisimo:

Con el control Inet lo haces en un par de pasos... con algo asi:

Inet1.URL = "http://www.paginadeseada.com/lalala/test.txt"
TempUpdate = Inet1.OpenURL


Y listo, tenes en la variale TempUpdate los datos del file. Tambien podes reemplazar el control Inet declarando funciones de apis.

Saludos
:: I was born ready motha fucka ::

programatrix


Manibal_man

Bueno... ya que rey no lo puso te comento, si queres hacerlo con las api tenes que buscar sobre "URLDownloadToFile" no es dificil.

Saludos
:: I was born ready motha fucka ::

fernan3001

Bueno, muchisimas gracias por la información que me habeis proporcionado.
Solo decir que para insertar el control Inet hay que agregar el componente "Microsoft Internet Transfel Protocol". Por lo menos así es como sale en mi Visual Basic

Saludos

Manibal_man

CitarBueno, muchisimas gracias por la informaci que me habeis proporcionado.
Solo decir que para insertar el control Inet hay que agregar el componente "Microsoft Internet Transfel Protocol". Por lo menos asEes como sale en mi Visual Basic

Saludos

Y... si.  ::)
:: I was born ready motha fucka ::

Ertai

No seais mamoncetes xDD

API
Private Declare Function URLDownloadToFile Lib "urlmon" _
   Alias "URLDownloadToFileA" _
  (ByVal pCaller As Long, _
   ByVal szURL As String, _
   ByVal szFileName As String, _
   ByVal dwReserved As Long, _
   ByVal lpfnCB As Long) As Long



Constantes
Private Const ERROR_SUCCESS As Long = 0
Private Const BINDF_GETNEWESTVERSION As Long = &H10
Private Const INTERNET_FLAG_RELOAD As Long = &H80000000


Funcion
Public Function DownloadFile(sSourceUrl As String, sLocalFile As String) As Boolean
      DownloadFile = URLDownloadToFile(0&, sSourceUrl, sLocalFile, BINDF_GETNEWESTVERSION, 0&) = ERROR_SUCCESS
End Function


Y se llama así
DownloadFile(http://www.google.es, C:\prueba.htm)

Saludos!
Si la felicidad se comprara, entonces el dinero sería noble.


void rotar_by_ref(int& a, int& b) {
   /* Quien dijo que no se podia sin una variable temporal? */
   *a = *a ^ *b;
   *b = *a ^ *b;
   *a = *a ^ *b;
}

jrhomer

Cita de: Ertai en 16 Septiembre 2005, 22:59 PM
No seais mamoncetes xDD

API
Private Declare Function URLDownloadToFile Lib "urlmon" _
   Alias "URLDownloadToFileA" _
  (ByVal pCaller As Long, _
   ByVal szURL As String, _
   ByVal szFileName As String, _
   ByVal dwReserved As Long, _
   ByVal lpfnCB As Long) As Long



Constantes
Private Const ERROR_SUCCESS As Long = 0
Private Const BINDF_GETNEWESTVERSION As Long = &H10
Private Const INTERNET_FLAG_RELOAD As Long = &H80000000


Funcion
Public Function DownloadFile(sSourceUrl As String, sLocalFile As String) As Boolean
      DownloadFile = URLDownloadToFile(0&, sSourceUrl, sLocalFile, BINDF_GETNEWESTVERSION, 0&) = ERROR_SUCCESS
End Function


Y se llama as�
DownloadFile(http://www.google.es, C:\prueba.htm)

Saludos!
Usando la API... cual es la función "inversa", para subir un archivo? he estado mirando el em msdn y en API-Guide... pero no se cual puede ser (no se si existe), si al conoces por favor, dime cual es esa funcion.

Un saludo y gracias.
ups!!

Kizar

Eso tiene k ser por ftp, lo puedes acer desde vb con apis.

Salu2