How to populate dataset using a data adapter in vb.net?

 

OleDbDataAdapter provides the communication between the Dataset and the Data Source with the help of OleDbConnection Object . The OleDbConnection Object has no information about the data it retrieves . Similarly a Dataset has no knowledge of the Data Source where the data coming from. So the OleDbDataAdapter manage the communication between these two Objects.
The OleDbDataAdapter object allows us to populate Data Tables in a DataSet. We can use Fill method of the OleDbDataAdapter for populating data in a Dataset. The following source codeshows a simple program that uses OleDbDataAdapter to retrieve data from Data Source with the help of OleDbConnection object and populate the data in a Dataset.
 
 
 
Imports System.Data.OleDb
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim connetionString As String
        Dim connection As OleDbConnection
        Dim oledbAdapter As OleDbDataAdapter
        Dim ds As New DataSet
        Dim i As Integer
        connetionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Your mdb filename;"
        connection = New OleDbConnection(connetionString)
        Try
            connection.Open()
            oledbAdapter = New OleDbDataAdapter("Your SQL Statement Here")
            oledbAdapter.Fill(ds)
            oledbAdapter.Dispose()
            connection.Close()
            For i = 0 To ds.Tables(0).Rows.Count - 1
                MsgBox(ds.Tables(0).Rows(i).Item(0))
            Next
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub
End Class