Bajar información de la web usando VBA

05/06/2006 - 23:09 por Leonardo | Informe spam
Buenas tardes. Lo primero que seguramente se les ocurrirá a todos es
decir " use consulta externa". Pero la verdad, es que necesito obtener
de un sitio web, información contenida en una base de datos. Necesito
introducir una contraseña, elegir varios criterios de búsqueda dentro
de la base de datos.

Pregunta: Cómo puede realizarse esto ? O al menos, donde puedo
conseguir info al respecto ?

Gracias.
 

Leer las respuestas

#1 Héctor Miguel
06/06/2006 - 06:40 | Informe spam
hola, Leonardo !

... seguramente se les ocurrira a todos... decir " use consulta externa"
... la verdad, es que necesito obtener de un sitio web, informacion contenida en una base de datos.
Necesito introducir una contrase#a, elegir varios criterios de busqueda dentro de la base de datos.
... Como puede realizarse esto ? O al menos, donde puedo conseguir info al respecto ?



1) la base de datos [en el sitio web], esta 'publicada' como tabla/html/... ?
o... necesita ser descargada [primeramente] a tu unidad de disco local ?
[supongo que se trata de la segunda opcion -por lo de la contrase#a-] -?-

2) la contrase#a es SOLO para acceso a la base de datos ?
o... tambien requieres para el acceso al sitio web -?-

en tanto comentas algun detalle mas... 'significativo'... te paso algo de informacion que pudiera ser de utilidad ;)
si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

1) no estoy muy seguro de que 'navegar' por sitios en la web, sea tan 'transparente' como navegar por tu unidad/disco local -?-
[y probablemente existan sub-carpetas en el sitio web de donde necesites descargar la base de datos] -?-
2) si puedes abrir [directamente] desde excel [o access, o ???] tus archivos de la web...
intenta grabando una macro y modificando/adaptando/... despues para otras caracteristicas 'finas' ;)
3) si el caso es que los archivos de la web requieren ser descargados a tu unidad/disco local...
existe un comando [interno] de D.O.S. que se encarga del protocolo para transferencia de archvios -> ftp.exe
4) encontraras informacion 'basica/inicial/ejemplos/... acerca del mencionado comando en...
http://www.computerhope.com/software/ftp.htm
http://www.vbip.com/wininet/wininet...and-01.asp
http://www.erlandsendata.no/downloads/ftpdemo.zip
5) o puedes intentar con un control activex 'de terceros' en: http://www.coolstf.com/activex.html
6) o puedes probar con el siguiente ejemplo, descargando un archivo al directorio del libro con la macro...
en un modulo de codigo 'normal' ==Sub Importar_Archivo_Web()
Dim Destino As String, Dominio As String, Archivo As String, _
Proceso As String, Batch As Integer
Destino = ThisWorkbook.Path & "\"
Dominio = "http://www.misitioweb.com" ' ... -> "http://159.16.208.90/" [y ojo con las sub-carpetas] ;) '
Archivo = "miArchivo.mdb"
Proceso = "Importar.bat"
ChDir Destino
Batch = FreeFile
Open Proceso For Output As #Batch
Print #Batch, "open " & Dominio
Print #Batch, "usuario" ' <- PON aqui la ID del usuario '
Print #Batch, "password" ' <- PON aqui la contrse#a '
Print #Batch, "retrive " & Archivo
Print #Batch, "close"
Print #Batch, "bye"
Close #Batch
Shell "cmd /c ftp -s:" & Proceso & " del " & Proceso, vbHide
End Sub

Preguntas similares