MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

4 participantes

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP

    avatar
    matz
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/05/2021

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty [Resolvido]Problema com exemplo do repositório sobre busca de CEP

    Mensagem  matz 10/6/2021, 21:13

    Pessoal, eu fiz conforme o exemplo do link abaixo
    https://www.maximoaccess.com/t29060-busca-cep-site-viacep

    mas quando clico no botão pra buscar, o access executa a sub mas não retorna nada.
    Eu depurei um pouco e vi o problema está dentro da function ConsultaCEP.

    Bem no finalzinho, nessa parte:

    For Each oXmlNode In oXmlNodes
       ConsultaCEP = oXmlNode.Text

    Ser eu passo o cursor em cima aparece a mensagem: oXmlNode.Text = A variável do objeto ou a variável do bloco 'With' não foi definida.

    Alguém sabe ajudar por favor?

    Obrigado!


    Última edição por DamascenoJr. em 10/6/2021, 23:55, editado 1 vez(es) (Motivo da edição : desrespeito as regras do fórum)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2594
    Registrado : 13/12/2016

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Problema com exemplo do repositório sobre busca de CEP

    Mensagem  Alexandre Fim 10/6/2021, 22:26

    Olá Matz,

    Vc marcou a referencia do Microsoft XML v3.0 ?

    Faz o seguinte:
    - Vá no menu Depurar e compilar sua aplicação
    - Execute o Compactar/Reparar

    []'s


    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Setinf11
    Sistemas e Tecnologia Ltda
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3704
    Registrado : 22/11/2016

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Re: [Resolvido]Problema com exemplo do repositório sobre busca de CEP

    Mensagem  DamascenoJr. 10/6/2021, 23:58

    Matheus, seja bem vindo ao fórum...

    Eu separei sua pergunta do tópico original pois tirar dúvidas lá não é permitido, conforme a regra 13 do fórum.

    Veja e conheça todas as regras para que mantenhamos a casa organizada.

    REGRAS DO FÓRUM

    1. Tenha paciência com quem coloca aqui as suas duvidas.
    2. Clareza nos títulos dos tópicos e duvidas, evite a linguagem MSN.
    3. Não colocar diversas vezes a mesma dúvida.
    4. Explicar detalhadamente o problema e informar a versão do seu Office + Sistema Operativo.
    5. Retorne sempre se deu certo, esse retorno é muito importante.
    6. Respeite toda a equipe Staff e demais membros deste fórum.
    7. Use sempre o botão Busca, sempre que tiver uma dúvida e antes de abrir tópicos.
    8. Não usar palavras como "Urgente". O fórum é livre e ninguém é obrigado a responder com urgência.
    9. A publicidade é proíbida e só pode ser feita pelo Administrador ou depois de aprovada pelo Administrador.
    10. Se o seu tópico não for respondido, tem o direito de fazer um Up ao final de 24horas!
    11. A colocação de Códigos ou Exemplos, devem constar sempre os créditos de quem o elaborou.
    12. Fale, não GRITE! Só letras Maiúsculas, na Internet é o mesmo que gritar!
    13. É proibido tirar duvidas nas Salas de Repositório, devem abrir um novo tópico nas salas de duvidas, relacionando o Exemplo em causa.
    14. É proibido adicionar links externos nos tópicos, que redirecionem para outros sites ("backlinks"), excepto DropBox ou do próprio fórum.
    15. É permitido adicionar links externos, nos códigos VBA dentro das Base de Dados.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    matz
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/05/2021

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Resposta a Alexandre Fim

    Mensagem  matz 12/6/2021, 00:55

    Olá Alexandre.

    Sim, eu fiz a referência ao XML v3.0.

    Eu achei estranho que até mesmo o arquivo anexo que peguei lá no exemplo também dá o mesmo problema, não foi só o meu código.

    Eu usei o compactador/reparador mas também não obtive sucesso.

    Segue anexo o meu BD pra você tentar olhar.

    É no formulário Frm_Guia. Na parte inferior tem um campo pra colocar o Cep e logo ao lado tem um botãozinho que é o que chama a sub.

    Quando faço o procedimento, não traz nenhum dado. Eu até digitei os dados de logradouro, cidade, etc, e quando chamo o procedimento ele apaga esses dados, como se estivesse substituindo por nulo.

    Obs.: Eu uso Access 2013 num Windows7 64. Eu acabei de testar num Access 2016 Windows 10 64 e funcionou. Será que pode ser alguma coisa relacionada à alguma configuração do chrome?

    Obrigado.
    Matheus
    Anexos
    [Resolvido]Problema com exemplo do repositório sobre busca de CEP AttachmentGP - Cópia.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.5 Mb) Baixado 9 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2594
    Registrado : 13/12/2016

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Re: [Resolvido]Problema com exemplo do repositório sobre busca de CEP

    Mensagem  Alexandre Fim 12/6/2021, 01:20

    Matz,

    Informe a senha, por favor !!!

    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    matz
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/05/2021

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Re: [Resolvido]Problema com exemplo do repositório sobre busca de CEP

    Mensagem  matz 14/6/2021, 19:12

    Perdão Alexandre, esqueci.

    bancodedadosGP

    Obrigado!
    marcelo3092
    marcelo3092
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 277
    Registrado : 19/08/2010

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Re: [Resolvido]Problema com exemplo do repositório sobre busca de CEP

    Mensagem  marcelo3092 14/6/2021, 23:21

    Ola boa noite seguinte o problema na UF que o buscador tras no seu campo UF vem de uma tabela que o primeiro campo e numero que e o id do registro UF
    ID Sigla Nome
    1 AC Acre
    2 AL Alagoas
    3 AP Amapá
    4 AM Amazonas
    5 BA Bahia
    6 CE Ceará
    7 DF Destrito Federal
    8 ES Espírito Santo
    9 GO Goiás
    10 MA Maranhão
    11 MT Mato Grosso
    12 MS Mato Grosso do Sul
    13 MG Minas Gerais
    14 PA Pará
    15 PB Paraíba
    16 PR Paraná
    17 PE Pernambuco
    18 PI Piauí
    19 RJ Rio de Janeiro
    20 RN Rio Grande do Norte
    21 RS Rio Grande do Sul
    22 RO Rondônia
    23 RR Roraima
    24 SC Santa Catarina
    25 SP São Paulo
    26 SE Sergipe
    27 TO Tocantins

    e quando busca ele tras somente a sigla e nao o codigo que este codigo e gerado pela sua tabela e nao pelo buscador.
    Como ele vai traze do buscador o UF vc vai ter que tirar ele do tipo combobox e mudar ele pra texto pois ele vai ser preenchido pelos dados que vai
    ser trazidos. testa ai e veja que aqui funcionou certim.
    cria este campo na tabela fichas do tipo texto normal "Ctr_UF_Ende" ai no formulario coloca a fonte do registro para este campo.

    Private Sub Comando234_Click()
    If ConsultaCEP(Me.Ctr_CEP, "erro") <> "true" Then
    Me.Ctr_Logradouro = ConsultaCEP(Me.Ctr_CEP, "logradouro")
    Me.Ctr_Bairro = ConsultaCEP(Me.Ctr_CEP, "bairro")
    Me.Ctr_Município = ConsultaCEP(Me.Ctr_CEP, "localidade")
    Me.Ctr_UF_Ende = ConsultaCEP(Me.Ctr_CEP, "uf")

    Else
    MsgBox "Verifique o CEP digitado!", vbInformation, "Atenção"
    End If
    End Sub
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2594
    Registrado : 13/12/2016

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Re: [Resolvido]Problema com exemplo do repositório sobre busca de CEP

    Mensagem  Alexandre Fim 15/6/2021, 00:47

    Matz boa noite,

    Não há necessidade de criar um ID numérico para a tabela Estados.
    A própria UF já serve como ID.

    Fiz algumas alterações no teu sistema para se comportar de forma mais adequada.

    - Na tabela "Fichas", mudei o tipo de dados do campo "ID_Estado" para Texto Curto, tamanho 2
    - No formulário Frm_Guia, modifiquei a origem da linha do campo Ctr_Uf_Ende para carregar somente a UF.
    - Inclui variáveis globais para carregar os dados de endereço

    Inclui a "fnBuscaCEP" onde ela é acessada somente 1 vez para carregar os dados do CEP.

    Os dados de endereço são carregados apos atualização do CEP (evento AfterUpdate) e não há necessidade de clicar no botão ao lado do cep.
    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Fichas10

    Segue versão ajustada.

    Espero ter ajudado.

    Boa sorte

    []'s

    FIM
    Anexos
    [Resolvido]Problema com exemplo do repositório sobre busca de CEP AttachmentGP_v2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.5 Mb) Baixado 24 vez(es)


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    matz
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/05/2021

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Resolvido

    Mensagem  matz 6/7/2021, 22:11

    Pessoal,

    Agradeço a ajuda. Eu entendi todas as questões sobre a sigla do estado, já ajustei no código.

    No entanto, o prolema não era esse. Quando eu executava a função de buscar o CEP, o resultado voltava vazio. A integração do access com os navegadores não estava funcionando direito. Mesmo com o erro do estado corrigido, a função não retorna os dados do endereço.

    Fiz o teste do meu código em outro computador mais novo e funcionou corretamente. Não sei que tipo de configuração/requisito pode estar atrapalhando no meu computador.

    De qualquer forma, eu substituí o meu código pelo do Alexandre Fim e dessa vez funcionou. Estudei bem seu módulo pra entender e aprender.

    Obrigado a todos pela ajuda.
    avatar
    matz
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/05/2021

    [Resolvido]Problema com exemplo do repositório sobre busca de CEP Empty Re: [Resolvido]Problema com exemplo do repositório sobre busca de CEP

    Mensagem  matz 6/7/2021, 22:13

    Atualizando para resolvido.

      Data/hora atual: 25/9/2022, 15:56