USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Localizar
Lincoln
não registrado
Postada em 15/07/2004 17:58 hs   
Veja... na 4º linha ele ta comparando o banco de dados com o que a caixa de texto do nome recebeu do ListBox, eu quero que ele continue fazendo isso, mas eu queria tambem que ele relacionace o Nome do cliente ao codigo do cliente para que na hora de que aconteça clientes com nomes iguais ele consiga diferenciar legal.
Private Sub List1_Click()
txtlocnome = List1
TBL.Seek "=", txtlocnome
If TBL.NoMatch Then
Else
ATFMR
End If
     
Lincoln
não registrado
Postada em 15/07/2004 18:12 hs   
Desculpe 2º Linha
     
X-Crow Original
Pontos: 2843
VITÓRIA
ES - BRASIL
Postada em 15/07/2004 18:16 hs         
Lincoln, se vc estiver usando um campo de código do tipo inteiro ou autonumeração vc pode:
'... Preenchendo o list com os dados do bd
List1.AddItem RsTabelaCliente!Nome
 List1.ItemData(List1.NewIndex) = RsTabelaCliente!CodigoCliente
'...
'para obter o código do itemdata
CódigoAtual = List1.ItemData(List1.listIndex)
 
Veja se resolve seu problema... Abraços, Sidnei
 
     
Lincoln
não registrado
Postada em 15/07/2004 18:32 hs   
Opa...Deu quase... mas o que é o Codigo Atual nessa rotina... ou que poderá ser
     
X-Crow Original
Pontos: 2843
VITÓRIA
ES - BRASIL
Postada em 16/07/2004 08:55 hs         
CódigoAtual é uma variável para, armazenar o Código do cliente selecionado no list para, ser usado por exemplo, substituindo o critério do o seek de nome por ela... Assim vc pesquisa pelo código ao invés do nome e evita a duplicidade pois mesmo com nomes iguais os códigos serão diferentes.
Abraços, Sidnei
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2026   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página