03/11/2004, 08:50
|
| | | Fecha de Ingreso: junio-2003 Ubicación: Asturias
Mensajes: 2.429
Antigüedad: 21 años, 9 meses Puntos: 7 | |
| Dim cadena As String = "SELECT * FROM usuarios ORDER BY nombre"
Dim adapter As New OdbcDataAdapter(cadena, cn)
Dim DSUsuarios As New DataSet()
Dim DR as DataRow
adapter.Fill(DSUsuarios, "usuarios")
For Each DR in DSUsuarios("Usuarios").Rows
Combo.Add.Item(DR("NombreDelCampo"))
Next
Hay un POST EXACTAMENTE IGUAL al tuyo.
__________________
Charlie.
Última edición por chcma; 03/11/2004 a las 08:54 |