SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: vbmc_2004 en Domingo 5 de Diciembre de 2004, 18:47

Título: Combos + Distinct
Publicado por: vbmc_2004 en Domingo 5 de Diciembre de 2004, 18:47

Hola amigos saben tengo otro problema...
resulta que estoy llenando un combo pero resulta que este combo tiene campos repetidos por ejemplo se repite el apellido "lopez" y cuando lleno el combo aparece las veces que este registrado en la base de datos he leido por ahi que una instruccion en sql me puede solucionar mi problema descubri la palabra "distinct" pero resulta que cuando la pongo en la consulta no me llena el combo.. como debo colocar la instruccion???
LE ENVIO EL CODIGO QUE ESTOY UTILIZANDO..PARA LLENAR EL COMBO

Código: Text

1.  
2. Private Sub Form_Load()
3. sql = ""
4. sql = sql + "select * from marcas" ' AQUI DEBE IR EL DISTINCT???
5. Set vista = db.CreateDynaset(sql)
6.  
7. Do Until vista.EOF
8. On Error Resume Next
9.       Combo1.AddItem (vista.Fields(3))
10.      vista.MoveNext
11. Loop
12. End Sub
13.  
14.  

ESPERO ME PUEDAN AYUDAR TAMBIEN LE HECHO UNA CONSULTA AL EVENTO CLICK DEL COMBO QUE LLENO Y COLOCANDO LA SIGUIENTE CONSULTA

Código: Text

1.  
2. Private Sub Combo1_Click
3. Combo1 = "Select Distinct Apellido From Clientes"
4. End Sub
5.  
6.  

y no he podido aclarar mi problema... de ante mano muchas gracias..
salu2

Título: Re: Combos + Distinct
Publicado por: vbmc_2004 en Domingo 5 de Diciembre de 2004, 19:41

Hola!!!
Gracias igual pero ya lo solucione....!!!!
atte.

VBMC_2004