Basico: Mostrar datos en un listbox Hola gente:
Baje un código que es para conectarse a una base de datos:
'Declaramos las variables a utilizar
Dim strConexion As String
Dim objConexion As OleDbConnection
Dim objComando As OleDbDataAdapter
Dim objDS As New DataSet
'Iniciamos el proceso de acceso a la fuente de datos
strConexion = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("\Base_Datos.mdb")
objConexion = New OleDbConnection(strConexion)
objComando = New OleDbDataAdapter("Select * From tblFamilias", strConexion)
objComando.Fill(objDS, "Familias")
Dim Row
Dim I As Integer = 1
DropDownList1.Items.Add("Seleccione la opción")
DropDownList1.Items.Item(0).Value = 0
For Each Row In objDS.Tables("Familias").Rows
DropDownList1.Items.Add(Row(1))
DropDownList1.Items.Item(I).Value = Row(0)
I += 1
Next
objConexion.Close()
Más o menos lo entiendo, pero me resulta poco claro el código dentro del for each
DropDownList1.Items.Add(Row(1))
DropDownList1.Items.Item(I).Value = Row(0)
¿Porque ahí usa row(1) y item(i) y todo eso? ¿Es posible usar el nombre de los campos directamente por favor?
mil graciasss
__________________ PD: Con amor, fe, amor a Dios y amistad podemos hacer un mundo mejor!!!! |