ASP.NET Accessへのデータベース接続

'Accessへのデータベース接続
Dim strProviderName As String
Dim strConnectionString As String

strProviderName = "System.Data.OleDb"

strConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;DataSource= _
                      |DataDirectory|\test.mdb;Persist Security Info=True"

Dim myProvider As DbProviderFactory = DbProviderFactories.GetFactory(strProviderName)
Dim myConnection As DbConnection = myProvider.CreateConnection()

myConnection.ConnectionString = strConnectionString
myConnection.Open()