03/10/2008, 11:41
|
| | | Fecha de Ingreso: diciembre-2007
Mensajes: 40
Antigüedad: 16 años, 5 meses Puntos: 1 | |
| Respuesta: llenado de combobo desde sql
mira lo que yo hago es esto
'lleno el cboloc
If rs9.State = 1 Then rs9.Close
sen = "select *from ocupacion order by idocup"
rs9.Open sen, cn, adOpenDynamic
If rs9.RecordCount < 1 Then
GoTo sale:
End If
cboocu.Clear
rs9.MoveFirst
Do While Not rs9.EOF
cboocu.AddItem rs9.Fields("idocup") + "-" + rs9("descri")
rs9.MoveNext
Loop
rs9.Close
sale: |