    1. copyright.asp溯dateaccessõģsqlgetdate
    2.  sql
<%
set conn=server.createobject("ADODB.Connection")
connectionstring="provider=SQLOLEDB.1;server=ASAINT;database=2004zu;UID=sa;PWD=1234"
on error resume next
conn.open connectionstring
%>
        access
<%
'option explicit
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="bbs/data/2004zu.mdb" <!-- ݿ../һĿ¼µ· data/test.mdbûһбڱĿ¼· /data/test.mdbվֱ·-->
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
ON ERROR RESUME NEXT <!-- ݿ  -->
conn.Open connstr
%>
