Visual Basic - Como cargar un combobox con una columna de una tabla

Life is soft - evento anual de software empresarial
   
Vista:

Como cargar un combobox con una columna de una tabla

Publicado por pablo (1 intervención) el 14/11/2013 19:53:15
Hola amigos, quisiera saber como es el codigo para cargar un combobox con una columna de una tabla de mi base de datos, estoy usando visual basic 6.
Mi BD se llama rentacar.mdb, la tabla se llama marca, y el combobox se llama combomarca. Ya pude relacionar el combobox con la BD, pero solo carga el prime registro de la columna y quiero que cargue todos. MUCHAS GRACIAS.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Como cargar un combobox con una columna de una tabla

Publicado por Juan Gilberto (278 intervenciones) el 15/11/2013 18:16:08
Checa este ejemplo y cambia por los nombres verdaderos
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Option Explicit
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
'
'
Private Sub Form_Load()
 
    Set cn = New ADODB.Connection
           cn.Provider = "Microsoft.Jet.OLEDB.4.0"
           cn.ConnectionString = "Data Source = C:\reantacar.mdb;" & "Persist Security Info = False"
           cn.Open
    Set rs = New ADODB.Recordset
           rs.Open "SELECT FieldName FROM marca", cn, adOpenForwardOnly, adLockReadOnly
 
    Do Until rs.EOF
        Combo1.AddItem (rs!FieldName)
        rs.MoveNext
    Loop
 
           rsPlaats.Close
    Set rsPlaats = Nothing
 
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Como cargar un combobox con una columna de una tabla

Publicado por Juan Gilberto (278 intervenciones) el 16/11/2013 17:33:21
las ultimas lineas de codigo, debe de ser:
1
2
rs.Close
Set rs = Nothing
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar