Need help for vb.net with adodb connection

[earvinnill]

---

Hi! im currently studying about the adodb connection and somehow i cant display the db on datagridview using adodb connection. I have a sample code of my recent project. Please help and reply asap thanks!

Private Sub GetDatatoGrid()
Try
Dim adconn As New ADODB.Connection()


adconn.ConnectionString = "DRIVER=MySQL ODBC 5.1 Driver;Server=10.237.250.252;uid=root;pwd=c0k3floa t;database=test;port=3306""Server=10.237.250.252;u id=root;pwd=c0k3float;database=test;port=3306"
adconn.Open()
Dim rs As New ADODB.Recordset()
rs.CursorLocation = ADODB.CursorLocationEnum.adUseClient
rs.CursorType = ADODB.CursorTypeEnum.adOpenStatic
rs.LockType = ADODB.LockTypeEnum.adLockBatchOptimistic
rs.Open("select * from earvin", adconn.ConnectionString)
rs.ActiveConnection = Nothing
adconn.Close()
Dim da As New System.Data.OleDb.OleDbDataAdapter()
Dim ds As New DataSet()
da.Fill(ds, rs, "Table")
3: For x As Integer = 0 To ds.Tables(0).Rows.Count - 1
dataGV.Rows.Insert(0) 'this will add a new record on top, always
dataGV.Rows(0).Cells(0).Value = ds.Tables(0).Rows(x)("id")
dataGV.Rows(0).Cells(1).Value = ds.Tables(0).Rows(x)("name")
dataGV.Rows(0).Cells(2).Value = ds.Tables(0).Rows(x)("age")
dataGV.Rows(0).Cells(3).Value = ds.Tables(0).Rows(x)("position")

Next
Catch ex As Exception
MsgBox(ex.Message)


End Try



p.s. may i know the meaning of da.fill and its parameter esp the string parameter on it

[RainRiku]

Solution 1
dataGV.DataSource = ds.Tables(0)
(ds.Tables(0) is a datatable and can be directly bind to the datagridview)

you can do this one bro it will automatically bind the columns from your datatable, given that ds.Tables(0) has data.

Solution 2, you can replace your loop with this one
Dim lintDVRow as integer = 0

For Each DocRow As DataRow In ds.Tables(0).Rows
dataGV.Rows(lintDVRow).Cells(0).Value = DocRow("id")
dataGV.Rows(lintDVRow).Cells(1).Value = DocRow("name")
dataGV.Rows(lintDVRow).Cells(2).Value = DocRow("age")
dataGV.Rows(lintDVRow).Cells(3).Value = DocRow("position")
lintDVRow = lintDVRow + 1
Next

[RainRiku]

Hi! im currently studying about the adodb connection and somehow i cant display the db on datagridview using adodb connection. I have a sample code of my recent project. Please help and reply asap thanks!

p.s. may i know the meaning of da.fill and its parameter esp the string parameter on it

da.fill - means your data adapter(da) will fill the dataset(ds) with values according to your query(""select * from earvin"") and will have a table name table "Table" (This is the string you inputted).

[earvinnill]

da.fill - means your data adapter(da) will fill the dataset(ds) with values according to your query(""select * from earvin"") and will have a table name table "Table" (This is the string you inputted).

so what do you i need to do for the table name table? i currently have existing db on my sql browser

[RainRiku]

it depends on how you use it, da.Fill(ds, rs, "Table") this statement will name the table "Table" so instead calling the table by this ds.Tables(0), you can call it using the table name ds.Tables("Table")

ds.Tables(0) and ds.Tables("Table") is basically just referring to a one table