Como leer datos desde una web?

[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 

[Manibal_man]

Es facilisimo:

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

Código [Seleccionar] Expandir

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

[programatrix]

Te recomiendo usar la api 

[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

[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]

Bueno, 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. 

[Ertai]

No seais mamoncetes xDD

API

Código [Seleccionar] Expandir

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

Código [Seleccionar] Expandir

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

Funcion

Código [Seleccionar] Expandir

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í

Código [Seleccionar] Expandir

DownloadFile(http://www.google.es, C:\prueba.htm)

Saludos!

[jrhomer]

No seais mamoncetes xDD

API

Código [Seleccionar] Expandir

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

Código [Seleccionar] Expandir

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

Funcion

Código [Seleccionar] Expandir

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�

Código [Seleccionar] Expandir

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.

[Kizar]

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

Salu2