<%
set conn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
DBPath = Server.MapPath("db3.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sqlquery="select top 5 * from table1 order by id desc"
set rs=conn.Execute(sqlquery)
%>
<%
set conn=server.createobject("adodb.connection")
set bs=server.createobject("adodb.recordset")
DBPath = Server.MapPath("db3.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sqlquery1="select top 5 * from table2 order by id desc"
set bs=conn.Execute(sqlquery1)
%>
<%
set conn=server.createobject("adodb.connection")
set cs=server.createobject("adodb.recordset")
DBPath = Server.MapPath("db3.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sqlquery2="select top 5 * from table3 order by id desc"
set cs=conn.Execute(sqlquery2)
%>
<%
set conn=server.createobject("adodb.connection")
set ds=server.createobject("adodb.recordset")
DBPath = Server.MapPath("db3.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sqlquery3="select top 11 * from table4 order by id desc"
set ds=conn.Execute(sqlquery3)
%>
阿三信息技术园地欢迎你！
设为首页
加入收藏
联系站长
