SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => VBA => Mensaje iniciado por: jodasamu en Jueves 30 de Diciembre de 2004, 16:45

Título: Datacombo
Publicado por: jodasamu en Jueves 30 de Diciembre de 2004, 16:45
:comp: hoal soy un principiante en visual basic quisiera saver como hago para llenal un datacombo desde un campo de una base de datos, lo que quiero es que me aparescan todos los datos que tengo en ese campo en forma de lista para escojer uno como puedo hacer


gracias enviemen la respuesta a jodasamu4@hotmail.com
Título: Re: Datacombo
Publicado por: desarrollo en Viernes 7 de Enero de 2005, 20:22
hola jodasamu  :hola:

prueba esto

Código: Text
  1.  
  2. Dim rsMarca As New ADODB.Recordset
  3.  
  4. Set rsMarca = New ADODB.Recordset
  5. rsMarca.CursorLocation = adUseClient
  6. SQL = "SELECT * FROM Marcas"
  7. rsMarca.Open SQL, CN, adOpenStatic, adLockReadOnly
  8. Set DataCombo1.RowSource = rsMarca
  9. DataCombo1.ListField = "Codigo_Marca"
  10. DataCombo1.BoundColumn = "Nombre_Marca"
  11.  
  12.  

te muestra los nombres y te guarda el codigo, para guardar el dato del datacombo lo manejas asi:

Código: Text
  1.  
  2. DataCombo1.BoundText
  3.  
  4.  

suerte

desarrollo  :comp: