其中数据库bbs.mdb有张friend 的表
<%
dim conn,rs
set conn=server.createobject("adodb.connection")
dbpath=server.mappath("../data/bbs.mdb")
conn.open "driver={microsoft acess driver(*.mdb)};dbq="&dbpath
s="select * from friend"
set rs=server.creatobject("adodb.recordset")
rs.open s,conn,3
%>