Aí galera, mais essa dúvida em relação a utilizar o navegador web do access.
Tem como eu criar um campo e o texto que for digitado nele seja o texto da busca no google?
Tipo assim:
Tenho um campo texto e um botão pesquisar.
Quando eu digitar uma palavra ou frase curta e pressiono o botão pesquisar, o navegador faz a busca no site da google?
Tentei esse código pesquisando na net mas não deu certo:
Private Sub Pesquisar_Click()
Dim IE As InternetExplorer
Set IE = New InternetExplorer
IE.Navigate "http://www.google.com.br"
IE.Document.All.Item("q").innertext = "Me.texto_pesquisa"
IE.Visible = True
End Sub
De acordo com o usuário que postou esse código, o "q" é o campo do site onde digitamos o texto para a pesquisa.
Nesse caso ele está usando uma nova janela do Internet Explorer.
Pra mim tanto faz ser em uma nova janela ou no próprio navegador web do access.
Alguém tem uma dica como fazer isso.
O erro dá na linha "IE.Document.All.Item("q").innertext = "Me.texto_pesquisa""
Tem como eu criar um campo e o texto que for digitado nele seja o texto da busca no google?
Tipo assim:
Tenho um campo texto e um botão pesquisar.
Quando eu digitar uma palavra ou frase curta e pressiono o botão pesquisar, o navegador faz a busca no site da google?
Tentei esse código pesquisando na net mas não deu certo:
Private Sub Pesquisar_Click()
Dim IE As InternetExplorer
Set IE = New InternetExplorer
IE.Navigate "http://www.google.com.br"
IE.Document.All.Item("q").innertext = "Me.texto_pesquisa"
IE.Visible = True
End Sub
De acordo com o usuário que postou esse código, o "q" é o campo do site onde digitamos o texto para a pesquisa.
Nesse caso ele está usando uma nova janela do Internet Explorer.
Pra mim tanto faz ser em uma nova janela ou no próprio navegador web do access.
Alguém tem uma dica como fazer isso.
O erro dá na linha "IE.Document.All.Item("q").innertext = "Me.texto_pesquisa""