<%

'Map your database
path = server.MapPath("yourdb.mdb")


'Creating Adodb Connection
set con = server.CreateObject("Adodb.Connection")

'Provider
con.Provider ="Microsoft.Jet.OLEDB.4.0"

'Open Connection
con.Open path

%>