conn.asp

一个通讯录

<%
dim conn,rs
set conn=Server.CreateObject("ADODB.Connection")
dbpath=Server.MapPath("data/myclass.mdb")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&dbpath
set rs=Server.CreateObject("ADODB.Recordset")
%>