Ir para conteúdo
Fórum Script Brasil
  • 0

Busca Endereço e salva em cliente


charlehardware

Pergunta

Olá pessoal eu de novo!

Pra começa tenho uma tabela recheada de endreços( que estrai de algum banco mdb de alg site que fornecia banco de endereços.

e importei para o meu mdb com o nome CEPRN. com os seguites campos:

Seq (chave primária)

Endc

SeRuave ( se é rua ou avenida )

Bairroc

Cidadec

CEPc

tenho uma Caixa-de-Combinão(pesqend) - (Não aclopada, que preferia que fosse um mini form) no form de clientes, Que nas propriedades desse caixa..de c..

Na origem da linha tem a seguite instru.. SQL:

SELECT CEPRN.Endc, CEPRN.SeRuave, CEPRN.Bairroc, CEPRN.Cidadec, CEPRN.CEPc FROM CEPRN;

linhas: 5

Apos atulizar: em codigo vba tem o seguite:

Private Sub pesqend_AfterUpdate()

Me.ActiveControl = UCase(Me.ActiveControl)

[Endereço] = pesqend.Column(0) ' copia da coluna 0(endc) p/ Endereços

[titoruav] = pesqend.Column(1)

[bairro] = pesqend.Column(2)

[Cidade] = pesqend.Column(3)

[CEP] = pesqend.Column(4)

Dim blRet As Boolean ' block bola do mouse

blRet = MouseWheelOFF(False)

Nº_End.SetFocus ' da foco au proximo campo

pesqend.Value = Null ' limpa a Caixa-de-Combinão(pesqend)

End Sub

até ai tudo bem: funciona Normal

o pro é que tem ruas com os mesmo nome Tipo asim:

santa fé bairro a

santa fé bairro b

em bairros difentes e codigos firentes

se eu apontár o "bairro b" ele pega o primeiro da lista no caso o "bairro a"

para resolver por enquanto repetir todo processo só que au invés de pesquizar pela rua fiz por codigo ai deu certo. e fiquei com o form de clientes cheio de Caixa-de-Combinão.

quando um mini form poderia fazer isso ou apenas uma Caixa-de-Combinão.

no aguardo.

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...