Acudo a uds una ves mas para solicitar de vuestra valiosa ayuda.
Arme un codigo de la siguiente manera, me ayude de google para llegar a este:
Sub AbrirWeb()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.application")
IE.Navigate "http://www.mercadopublico.cl/Portal/Modules/Site/Busquedas/BuscadorAvanzado.aspx?qs=1"
Do
DoEvents
Loop Until IE.readystate = 4
IE.Document.getelementbyid("txtSearch").Value = "2239-14-LP14"
IE.Document.getelementbyid("btnBusqueda").Click
IE.Visible = True
'Posibilidad de obtener codigo fuente
'IE.Visible = False
End Sub[/CODE]
Este código me abre la pagina web, lo hago así porque debo ingresar el valor a buscar en forma manual, con este código puedo automatizar la búsqueda.
La finalidad de esto es poder obtener el código fuente, ya que en este esta la información que necesito.
Mi consulta apunta a que si de esta forma puedo obtener dicho código.
De antemano muchas gracias.
PD: se trata de paginas publicas y no se genera ningún problema legal si abren el archivo.
Saludos Cordiales
Pedro Venegas Q.
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Estimados
Buenas Noches
Acudo a uds una ves mas para solicitar de vuestra valiosa ayuda.
Arme un codigo de la siguiente manera, me ayude de google para llegar a este:
Este código me abre la pagina web, lo hago así porque debo ingresar el valor a buscar en forma manual, con este código puedo automatizar la búsqueda.
La finalidad de esto es poder obtener el código fuente, ya que en este esta la información que necesito.
Mi consulta apunta a que si de esta forma puedo obtener dicho código.
De antemano muchas gracias.
PD: se trata de paginas publicas y no se genera ningún problema legal si abren el archivo.
Saludos Cordiales
Pedro Venegas Q.