Bajar información de la web usando VBA

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

otra opción es utilizando el objeto WebBrowser, el cual te permite crear un
"navegador" y controlarlo.


"Leonardo" escribió:

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.

Hola Hector:
Leo en tu post que dices que se puede abrir un archivo web desde Access y
necesitaría saber como hacerlo.
Te planteo el problema a ver si me puedes tirar una punta. Ya hice la
consulta en el foro de Access y VB pero no he tenido respuesta.

Para ver los resultados de una consulta web de Excel lo hago con "Realizar
una Consulta web" Ahora para hacerlo con Access, no he encontrado manera.

Saludos.

PLANTEL S.A.
Claudio E. Aguilera
Jefe Distrito La Plata
0221 155 233744
0221 417 6682

"Héctor Miguel" escribió en el mensaje
news:

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
trase#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

hola, Claudio !

Leo en tu post que dices que se puede abrir un archivo web desde Access y necesitaria saber como hacerlo...
Ya hice la consulta en el foro de Access y VB pero no he tenido respuesta.
Para ver los resultados de una consulta web de Excel lo hago con "Realizar una Consulta web"
Ahora para hacerlo con Access, no he encontrado manera...

1) [yo] no 'me manejo' muy bien con el access... por ello preguntaba en el mensaje que refieres que...

2) si puedes abrir [directamente] desde excel [o access, o ???] tus archivos de la web... [etc. etc. etc.]

2) el resto de la propuesta es para cuando no es posible 'abrir' los archivos [directamente] desde su sitio web -?-
la sugerencia -genealmente- es 'bajarlos/descargarlos/...' a tu propia pc, -con el FTP.exe-... y abrirlos con 'X' aplicacion

3) [segun parece] la facilidad que ofrece excel para 'consultar' en la web, no esta 'compartida' por el access :-(
[aparte de que son diferentes equipos de desarrollo]... revisa: -> http://tinyurl.com/juomq

4) considerando que puedes 'cubrir' la consulta a la web desde excel... [probablemente]
te seria de utilidad 'aprovechar' el archivo .xls con dicha consulta y... [estando el .xls CERRADO]...
desde access [en tu archivo .mdb] usar: [menu] archivo / obtener datos externos / importar...
y seleccionar el tipo de archivos de microsoft excel, abriendo despues 'tu' archivo con la consulta web
[puedes optar por mostrar el dialogo del asistente una vez que termine, por si deseas consultar otras opciones] ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Gracias Hector.

Claudio

PLANTEL S.A.
Claudio E. Aguilera
Jefe Distrito La Plata
0221 155 233744
0221 417 6682

"Héctor Miguel" escribió en el mensaje
news:

hola, Claudio !

Leo en tu post que dices que se puede abrir un archivo web desde Access y
necesitaria saber como hacerlo...
Ya hice la consulta en el foro de Access y VB pero no he tenido
respuesta.
Para ver los resultados de una consulta web de Excel lo hago con
"Realizar una Consulta web"
Ahora para hacerlo con Access, no he encontrado manera...

1) [yo] no 'me manejo' muy bien con el access... por ello preguntaba en el
mensaje que refieres que...

2) si puedes abrir [directamente] desde excel [o access, o ???] tus
archivos de la web... [etc. etc. etc.]

2) el resto de la propuesta es para cuando no es posible 'abrir' los
archivos [directamente] desde su sitio web -?-
la sugerencia -genealmente- es 'bajarlos/descargarlos/...' a tu propia
pc, -con el FTP.exe-... y abrirlos con 'X' aplicacion

3) [segun parece] la facilidad que ofrece excel para 'consultar' en la
web, no esta 'compartida' por el access :-(
[aparte de que son diferentes equipos de desarrollo]... revisa: ->
http://tinyurl.com/juomq

4) considerando que puedes 'cubrir' la consulta a la web desde excel...
[probablemente]
te seria de utilidad 'aprovechar' el archivo .xls con dicha consulta
y... [estando el .xls CERRADO]...
desde access [en tu archivo .mdb] usar: [menu] archivo / obtener datos
externos / importar...
y seleccionar el tipo de archivos de microsoft excel, abriendo despues
'tu' archivo con la consulta web
[puedes optar por mostrar el dialogo del asistente una vez que termine,
por si deseas consultar otras opciones] ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.