ASP.NET

Sub Page_Load()

        Dim myMDBConnection As OleDbConnection = New OleDbConnection(ConfigurationManager.ConnectionStrings("Register").ToString().Trim())
        myMDBConnection.Open()
        'do stuff here
        myMDBConnection.Close()
    End Sub


    Protected Sub CreateUser_Click(ByVal sender As Object, ByVal e As System.EventArgs)

        Dim conn As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data source=C:\myDatabase.mdb;")
        Using conn

            Dim Sql As String = "INSERT INTO userlist (username,password, strEmail) VALUES (@username,@password, @strEmail)"
            Dim cmd As New OleDbCommand(Sql, conn)
            conn.Open()
            cmd.Parameters.AddWithValue("@username", username.Text)
            cmd.Parameters.AddWithValue("@password", password.Text)
            cmd.Parameters.AddWithValue("@strEmail", strEmail.Text)
            cmd.ExecuteNonQuery()
            conn.Close()

        End Using
    End Sub

End Class

<?xml version="1.0"?>

    <configuration>
      <connectionStrings>       
          
            <add name="Register" providerName="Microsoft.Jet.OLEDB.4.0;" 
                 connectionString="C:\myDatabase.mdb;" />
     
          </connectionStrings>
     </configuration>