COMBO - NAO MOSTRAR NOMES REPETIDOS

 Tópico anterior Próximo tópico Novo tópico

COMBO - NAO MOSTRAR NOMES REPETIDOS

VB / VBA

 Compartilhe  Compartilhe  Compartilhe
#357037 - 09/11/2010 19:30:54

EVERSON PASETTO
CANOAS
Cadast. em:Outubro/2005


Tenho uma tabela onde carrega nomes de clientes que realizaram compras..
Mas acontece que o cliente pode ter realizado mais de uma compra. então quero carregar apenas uma vez os nomes..

Tenho este codigo..
Dim rstconsulta As New ADODB.Recordset
  
    rstconsulta.Open "Produto", cnnBanco
    Do While Not rstconsulta.EOF
        cboNome.AddItem rstconsulta.Fields("NomeCli")
        rstconsulta.MoveNext
    Loop
    rstconsulta.Close
    Set rstconsulta = Nothing

Como faço para carregar os dados na combo sem repetir ?

Obrigado e até +



#357038 - 09/11/2010 19:34:44

LUISNET10
SAO PAULO
Cadast. em:Novembro/2009




Amigo...

aCHO Q ISSO VAI FUNCIONAR

retconsulta.Open "Select into * from produto", cnnBanco






#357044 - 09/11/2010 21:16:51

SACOFRITO
SP
Cadast. em:Janeiro/2010


Última edição em 09/11/2010 21:49:52 por SACOFRITO

Em ADO nao sei, mas em DAO é
"select distinct campo from tabela"

Seguindo em frente.

Resposta escolhida #357046 - 09/11/2010 21:28:36

TRTNCG
CAMPINA GRANDE
Cadast. em:Fevereiro/2004


Usa a seguinte SQL

Select NomeCli from NomeDaTabela Group by NomeCli



 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por EVERSON PASETTO em 09/11/2010 22:51:11