|
<%
dim conn,mdbfile,sql
mdbfile=server.mappath("db.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=管理员;pwd=f5g4v4x6;dbq="&mdbfile
set rs=server.createobject("adodb.recordset")
sql="select * from contact"
rs.open sql,conn,3,2
%>
|
|