Tilgå acces db

jeg har følgende:

<%@ Page Language="VB" Debug="true" %>
<%@ Import namespace="System.Data.SqlClient" %>
<%@ Import namespace="System.Data" %>
<%@ Import namespace="System.Data.OleDb" %>



<script runat="server">

sub Button_Click(s as Object, e as EventArgs)


Dim con As SqlConnection
Dim cmd As SqlCommand
Dim dtr As SqlDatareader

con = new SqlConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Inetpub\wwwroot\elevportal\db.mdb")



end sub

</script>

Det virker ikke, men jeg kan ikke huske hvordan jeg laver en forbindelse til en access db. pls help