CLICAR EM UM BOTÃO USANDO O WEBBROWSER

JORGESALES 21/01/2016 00:17:33
#456316
Pessoal boa noite, estou tentando clicar no botão [Ô]Encontre[Ô] deste site:
http://cep.guiamais.com.br/busca
Tentei os códigos abaixo mas todos retornam a mesma mensagem de erro:
Citação:

Object variable or with block variable not set


    Set goBtn = WB.Document.getElementByClass([Ô]submit[Ô])
    goBtn.Click

    Set goBtn = WB.Document.getElementById([Ô]btSearch[Ô])
    goBtn.Click

Tentei este aqui também:
WebBrowser1.Document.All([Ô]Submit1[Ô]).Click


Agradeço a todos que possam ajudar
KERPLUNK 21/01/2016 02:42:21
#456318
Acho que você [Ô]trocou as bolas[Ô] aí. Tente assim:

    Set goBtn = WB.Document.getElementByClass([Ô]btSearch[Ô])
    goBtn.Click
FABRICIOWEB 21/01/2016 09:35:57
#456326 Resposta escolhida
O jeito mais fácil e você ver o código fonte do html ou botão direito do mouse em cima do botão e inspecionar elemento ae você ver a id do botão
JORGESALES 21/01/2016 09:39:52
#456327
Citação:

:
Acho que você [Ô]trocou as bolas[Ô] aí. Tente assim:


Eu já havia tentado isso também, nesse caso dá uma mensagem que
[Ô][txt-color=#e80000]o objeto não suporta essa propriedade ou metodo[/txt-color][Ô]



Alguém tem mais alguma dica?
FABRICIOWEB 21/01/2016 10:23:26
#456328
jorge faça dessa forma fiz o teste funcionou perfeitamente ok espero ter ajudado

Dim txtCEP As Object
Dim btnProcurar As Object
Set txtCEP = WebBrowser2.Document.getElementById([Ô]search[Ô])
Set btnProcurar = WebBrowser2.Document.getElementsByTagName([Ô]input[Ô])(1)
txtCEP.Value = [Ô]95088080[Ô]
btnProcurar.Click

Não esquece de encerra o tópico e pontuar ok
JORGESALES 21/01/2016 16:57:01
#456360
FABRICIOWEB,
Citação:

Não esquece de encerra o tópico e pontuar ok


eu encerro e pontuo com todo prazer, vocês me ajudam
bastante, encontrei na programação e no vbmania uma
nova alegria para viver, Deus abençoe a todos vocês.
Tópico encerrado , respostas não são mais permitidas
Voltar