recuperar resultados... access - vb.net

21/07/2004 - 10:06 por Jordi Maycas | Informe spam
genial puse esto y funciona:

Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=e:\motllos.mdb"

Dim myDs As New System.Data.DataSet

Dim myConn As New System.Data.OleDb.OleDbConnection(strConn)

Dim myComm As New System.Data.OleDb.OleDbCommand("SELECT CI,tipo FROM
centro_inversion", myConn)

Dim myDa As New System.Data.OleDb.OleDbDataAdapter

myDa.SelectCommand = myComm

myDa.Fill(myDs, "centro_inversion")

DataGridView1.DataSource = myDs.Tables("centro_inversion").DefaultView



Ahora la pregunta es: supongo que tengo que cerrar las conexiones una vez
terminado el trabajo y por otro lado... como accedo a los resultados?
Querria cojer uno a uno, los valores de un campo...



Gracias
 

Leer las respuestas

#1 Jordi Maycas
21/07/2004 - 11:43 | Informe spam
solucionado... pero, hay alguna forma mas eficiente?

Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=e:\motllos.mdb"

Dim myDs As New System.Data.DataSet

Dim myConn As New System.Data.OleDb.OleDbConnection(strConn)

Dim myComm As New System.Data.OleDb.OleDbCommand("SELECT CI,tipo FROM
centro_inversion", myConn)

Dim myDa As New System.Data.OleDb.OleDbDataAdapter

myDa.SelectCommand = myComm

myDa.Fill(myDs, "centro_inversion")

DataGridView1.DataSource = myDs.Tables("centro_inversion").DefaultView

Dim contador As Integer

Dim bucle As Integer

contador = myDs.Tables("centro_inversion").Rows.Count

For bucle = 0 To contador - 1

ComboBox1.Items.Add(myDs.Tables("centro_inversion").Rows(bucle).Item("CI"))

Next

"Jordi Maycas" escribió en el mensaje
news:
genial puse esto y funciona:

Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=e:\motllos.mdb"

Dim myDs As New System.Data.DataSet

Dim myConn As New System.Data.OleDb.OleDbConnection(strConn)

Dim myComm As New System.Data.OleDb.OleDbCommand("SELECT CI,tipo FROM
centro_inversion", myConn)

Dim myDa As New System.Data.OleDb.OleDbDataAdapter

myDa.SelectCommand = myComm

myDa.Fill(myDs, "centro_inversion")

DataGridView1.DataSource = myDs.Tables("centro_inversion").DefaultView



Ahora la pregunta es: supongo que tengo que cerrar las conexiones una vez
terminado el trabajo y por otro lado... como accedo a los resultados?
Querria cojer uno a uno, los valores de un campo...



Gracias




Preguntas similares