CONSULTA CORREIOS WEBBROWSER

BADJECO 09/07/2015 15:27:25
#448639
Eu até tentei assim , mas nao consegui pegar a variavel do botao ai fica dando

Run-Time error [ô]91[ô]
Object variable or with variable not set

Alguma ideia de por que ?
ja inseri o Dim submit As Object
seria isso nao?



[XMAN2000] , DEIXA SO FICAR 100%! que te passo.
LUIZCOMINO 10/07/2015 09:22:25
#448662
amigão jogue o cep direto na consulta depois leia a pagina apenas


Dim Cep as string
 cep = [Ô]03014000[Ô]

    WebBrowser1.Navigate [Ô]http://www.buscacep.correios.com.br/servicos/dnec/consultaEnderecoAction.do?relaxation=[Ô] & cep & [Ô]&TipoCep=ALL&semelhante=N&cfm=1&Metodo=listaLogradouro&TipoConsulta=relaxation&StartRow=1&EndRow=10[Ô]
ASHKATCHUP 10/07/2015 14:05:28
#448667
Tenho duas notícias, uma boa e uma má.

Boa: o código é simples e está funcionando perfeitamente.

Má: ainda não consegui ler os dados que o site retorna.

Edit: funcionando em VB6 e C#

VB6

Private Sub Command1_Click()
    WebBrowser1.navigate [Ô]http://m.correios.com.br/movel/buscaCepConfirma.do[Ô]
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Dim txtCEP          As Object
    Dim btnProcurar     As Object
    [ô]
    Set txtCEP = WebBrowser1.document.getElementById([Ô]cepEntrada[Ô])
    Set btnProcurar = WebBrowser1.document.getElementsByTagName([Ô]input[Ô])(3)
    [ô]
    txtCEP.Value = [Ô]95088080[Ô]
    btnProcurar.Click
    [ô]
End Sub


C#


        private void button1_Click(object sender, EventArgs e)
        {
            webBrowser1.Navigate([Ô]http://m.correios.com.br/movel/buscaCepConfirma.do[Ô]);
        }

        private void webBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e)
        {
            HtmlElement txtCEP = webBrowser1.Document.GetElementById([Ô]cepEntrada[Ô]);
            HtmlElement btnClick = webBrowser1.Document.GetElementsByTagName([Ô]input[Ô])[3];
            
            txtCEP.SetAttribute([Ô]value[Ô], [Ô]95088080[Ô]);
            btnClick.RaiseEvent([Ô]onclick[Ô]);


        }
TUNUSAT 10/07/2015 16:04:22
#448675
PessoALL,

Só para [Ô]ilustrar[Ô] o post:
==========================================================
VB .NET - Usando um WebService para localizar o endereço pelo cep
http://www.macoratti.net/15/07/vda060715.htm
==========================================================

[][ô]s,
Tunusat.
BADJECO 13/07/2015 08:43:52
#448734
Ash , Desculpas , fiquei o fim de semana em repolso só puder ver o topico agora....
Entao nao temos problema algum , vou terminar o modulo aqui e te mando por email , ou posto aqui pros amigos ou os dois

[Tunusat]
Show , só que esse é em vb.net correto , estou procedendo em VB
E em relaçao ao CEP fiz aqui rapidinho , nao foi dificil com os exemplos do proprio Macoratti e e alguns dos amigos daqui.
Mas obrigado , novamente
ASHKATCHUP 13/07/2015 09:48:15
#448736
Uma coisa importante: o componente WebBrowser precisa estar com a propriedade visible = true. Se tu quiser que ele não apareça na tela, coloque a propriedade LEFT = - 500 ou algum outro valor negativo.
TUNUSAT 13/07/2015 11:55:05
#448747
BADJECO,

Sugestão:
Você pode montar uma [Ô].DLL[Ô] no VB.Net e usá-la no VB6. O que acha?

[][ô]s,
Tunusat.
EPISCOPAL 12/08/2015 12:09:10
#449850
Citação:

Você pode montar uma [Ô].DLL[Ô] no VB.Net e usá-la no VB6. O que acha?



é uma solução ...


faz uma pesquisa sobre ACBR NETFRAMEWORK COM VB6 .......... tem louko pra tudo
Página 2 de 2 [18 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar