Create OleDbConnection to Access database 2 : OleDbConnection « Database ADO.net « VB.Net Tutorial

1. VB.Net Tutorial
2. Database ADO.net
3. OleDbConnection

Imports System.Data

Module Test

    Sub Main()
        Dim sConnectionString, sSQL As String
        
        'SQL Connection String
      sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\yourdatabase.mdb"

        sSQL = "SELECT Title FROM yourTable"

        Dim conn As New System.Data.OleDb.OleDbConnection(sConnectionString)
        Dim cmd As New System.Data.OleDb.OleDbCommand(sSQL, conn)
        Dim dr As System.Data.OleDb.OleDbDataReader
        conn.Open()

        dr = cmd.ExecuteReader()

        Do While dr.Read()
            System.Console.WriteLine(dr.Item("Title"))
        Loop

        dr.Close()
        conn.Close()
    End Sub
End Module