Databasa connectivity

[abhi8659]

I want to connect ASP database with MS access.

[shweta123]

<%
dim con
dim constr
dim rs

con=Server.CreateObject("Adodb.Connection")
constr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Northwind.mdb;Persist Security Info=False"
con.open
rs=Server.CreateObject("Adodb.Recordset")
sql="Select * from..........."
set rs=con.execute(sql)
%>


Shweta