CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Llenar una matriz con un campo de una tabla

(1/2) > >>

jotae:
Podrían ayudarme para llenar una matriz con un campo de una tabla, por favor?
Trabajo con Visual Basic 2005 Express


El código base:


--- Código: vb.net ---Me.con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & "c:socios.mdb; Persist Security Info=False" con.Open()vtda = New OleDbDataAdapter("Select nombre from inscritos where status= 1 ", con)Dim oCB As OleDbCommandBuilder = New OleDbCommandBuilder(dta)dst = New DataSetdta.Fill(dst, "inscritos")vActivos = Me.dst.Tables("inscritos").Rows.Count 
De esta DB necesito llenar una matriz con el campo nombre quizá por medio de un Datareader pero sinceramente no sé cómo hacerlo.

Agradecería mucho su ayuda porque soy novato en esto. Gracias!!!

gabio2:

--- Código: vb.net ---Me.con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & "c:socios.mdb; Persist Security Info=False" con.Open()vtda = New OleDbDataAdapter("Select nombre from inscritos where status= 1 ", con)Dim oCB As OleDbCommandBuilder = New OleDbCommandBuilder(dta)Dim dt As  New  DataTableDim ArrayNombres As New ArrayListdta.Fill(dt, "inscritos") 'Aquí se agregan a nuestro Array.. For Each dr As DataRow In dt.RowsArrayNombres.Add(dr(0).ToString())Next  
Saludos! espero te sirva..

jotae:
Gracias por responderme. Me da un error en la línea marcada. El código quedó así:


--- Código: vb.net ---Private Sub tbMensualidad_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbMensualidad.Click   ' la base de datos ya está abierta arriba....    dta = New OleDbDataAdapter("Select nombre from inscritos where status= 1 ", con)    Dim oCB As OleDbCommandBuilder = New OleDbCommandBuilder(dta)    Dim dt As New DataTable      Dim ArrayNombres As New ArrayList    dta.Fill(dt, "inscritos") ' **** error en esta linea*****    'Aquí se agregan a nuestro Array..    For Each dr As DataRow In dt.Rows      ArrayNombres.Add(dr(0).ToString())    Next      End Sub 

El error:

El objeto no es ADODB.RecordSet ni ADODB.Record.
Nombre del parámetro: adodb

Saludos y gracias de nuevo.

gabio2:
Algo estás haciendo mal con respecto a tu conexión con la BD, con el código que tenias anteriormente no te producia ningún error?...

te recomiendo que leeas los siguientes links
http://www.elguille.info/NET/ADONET/ejemploSQL.htm
http://social.msdn.microsoft.com/Forums ... ab3d4062aa
http://msdn.microsoft.com/es-es/library ... 71%29.aspx


Por cierto, igual puedes usar Google, solo pones a buscar "Como conectar VB.NET con SQL Server" , o cosas similares, tu problema ahora es con la BD, tu duda anterior espero haya quedado resuelta saludos! :)

jotae:
Gracias pero la conexion funciona perfectamente. El problema no es la DB. Si quito las lineas del array todo trabaja perfecto. Realmente el programa está funcionando hace un año y no hay ni el más mínimo problema en la base de datos pero hay que hacer una modificación y para ello se requiere este array. De todas formas, gracias por la intención pero no me funciona. Seguiré intentando la solucion. Saludos.-

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

Ir a la versión completa