Is any Record Set Concept is there in OLEDB

[Praveen 123]

I am having a Select Query which is suppose to select multipple records from a table (MS-Access). I am using OLEDB from my connection and using OLEDB Adapter and datasets to desplay data. But I want to perform an operation on Each records after selecting from the DB- Which I want to Diaplay to the Data Grid also. But By using the OLEDB i am unable to collect the information from the records before binding. Is any way there to take the records and operate on it before binding, and using OLEDB ? Dim con As OleDbConnection Dim cmd As OleDbCommand = New OleDbCommand Dim dataSet As dataSet = Nothing Sub BindGrid() Dim oleDbDataAdapter As OleDbDataAdapter = Nothing Dim ConnectionString = System.Configuration. _ ConfigurationSettings.AppSettings(ConConstant.MS_ACCESS_CONNECTION_STRING) ' Ge the sql query Dim SelectQueryText As String = String.Empty SelectQueryText = "Select Leave_Code as LeaveCode,Leave_Name as LeaveName,NoOfDays as Days from Leave_Mstr" oleDbDataAdapter = New OleDbDataAdapter(SelectQueryText, _ New OleDbConnection(ConnectionString)) ' Create the data set dataSet = New DataSet ' Fill the data set with the data oleDbDataAdapter.Fill(dataSet) If (Not oleDbDataAdapter Is Nothing) Then oleDbDataAdapter = Nothing End If With dgLeavCrtnLeavDtls .DataSource = dataSet .DataMember = dataSet.Tables(0).TableName .DataBind() End With End Sub Sub tablebind() Dim oleDbDataAdapter As OleDbDataAdapter = Nothing Dim ConnectionString = System.Configuration. _ ConfigurationSettings.AppSettings(ConConstant.MS_ACCESS_CONNECTION_STRING) ' Ge the sql query Dim SelectQueryText As String = String.Empty SelectQueryText = "Select Leave_Code as LeaveCode,Leave_Name as LeaveName,NoOfDays as Days from Leave_Mstr" oleDbDataAdapter = New OleDbDataAdapter(SelectQueryText, _ New OleDbConnection(ConnectionString)) ' Create the data set dataSet = New DataSet ' Fill the data set with the data oleDbDataAdapter.Fill(dataSet) Dim dh As TableHeaderCell Dim dc As DataColumn Dim dr As DataRow For Each dr In dataSet.Tables(0).Rows Dim trow As New TableRow For Each dc In dataSet.Tables(0).Columns Dim tcell As New TableCell tcell.Co

[Scott Dorman]

Instead of using the <code> tag, you should use the <pre> tag.

Dim con As OleDbConnection
Dim cmd As OleDbCommand = New OleDbCommand
Dim dataSet As dataSet = Nothing

Sub BindGrid()
Dim oleDbDataAdapter As OleDbDataAdapter = Nothing
Dim ConnectionString = _
System.Configuration.ConfigurationSettings.AppSettings(ConConstant.MS_ACCESS_CONNECTION_STRING)

' Ge the sql query
Dim SelectQueryText As String = String.Empty
SelectQueryText = "Select Leave_Code as LeaveCode,Leave_Name as LeaveName,NoOfDays as Days from Leave_Mstr"
oleDbDataAdapter = New OleDbDataAdapter(SelectQueryText, New OleDbConnection(ConnectionString))

' Create the data set
dataSet = New DataSet

' Fill the data set with the data
oleDbDataAdapter.Fill(dataSet)
If (Not oleDbDataAdapter Is Nothing) Then
oleDbDataAdapter = Nothing
End If

With dgLeavCrtnLeavDtls
.DataSource = dataSet
.DataMember = dataSet.Tables(0).TableName
.DataBind()
End With
End Sub

Sub tablebind()
Dim oleDbDataAdapter As OleDbDataAdapter = Nothing
Dim ConnectionString = _
System.Configuration.ConfigurationSettings.AppSettings(ConConstant.MS_ACCESS_CONNECTION_STRING)

' Ge the sql query
Dim SelectQueryText As String = String.Empty
SelectQueryText = "Select Leave_Code as LeaveCode,Leave_Name as LeaveName,NoOfDays as Days from Leave_Mstr"
oleDbDataAdapter = New OleDbDataAdapter(SelectQueryText, New OleDbConnection(ConnectionString))

' Create the data set
dataSet = New DataSet

' Fill the data set with the data
oleDbDataAdapter.Fill(dataSet)

Dim dh As TableHeaderCell
Dim dc As DataColumn
Dim dr As DataRow

For Each dr In dataSet.Tables(0).Rows
Dim trow As New TableRow

  For Each dc In dataSet.Tables(0).Columns
     Dim tcell As New TableCell
     tcell.Controls.Add(New LiteralControl(dr(dc.ColumnName).ToString))
     trow.Cells.Add(tcell)
  Next

Next
End Sub

Why do you have both of these functions? They do almost the same thing, except one tries to bind the data grid to the table and the other one looks like you are trying to copy the row to a new row. It's not entirely clear what you are trying to do or what the problem is that you are encountering.

----------------------------- In just two days, tomorrow will be yesterday. http://geekswithblogs.net/sdorman<