txeriff
08 de Abril del 2005

pues eso que no consigo que me cargue mas de un valor.
uso odbc.

pelicano
08 de Abril del 2005

mejor utiliza un combo normal e introduce el siguiente codigo

Rstclientes.MoveFirst 'El recordset
While Not Rstclientes.EOF ' mientras no sea fin de archivo
lsclientes = IIf(IsNull(Rstclientes("crazonsocial")), "**Ninguno**", Trim(Rstclientes("crazonsocial")))
FrmCotizacionInd.Cbocliente.AddItem lsclientes

Rstclientes.MoveNext
Wend

y con eso tienes, bye