鸡蛋怎么做好吃又营养:如何在一个asp文件中两次或多次调用数据库？

第一次调用完
用
rs.close关闭第一个连接
然后在调用第二次，例如

dim conn,connstr
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("db.mdb")
conn.Open connstr

set rs=server.createobject("adodb.recordset")
sql="select * from admin where chk=0 order by id asc"
rs.open sql,conn,1,3
……
rs.close

sql="select * from admin where chk=1 order by id asc"
rs.open sql,conn,1,3
……
rs.close
set rs=nothing

conn.close
set conn=nothing

如过需要在调用第一次时调用第二次只需要建立名称不同的两个对象就可以了，例如：

dim conn,connstr
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("db.mdb")
conn.Open connstr

set rs1=server.createobject("adodb.recordset")
sql1="select * from admin where chk=0 order by id asc"
rs1.open sql1,conn,1,3

set rs2=server.createobject("adodb.recordset")
sql2="select * from admin where chk=1 order by id asc"
rs2.open sql2,conn,1,3

……
rs1("字段")=rs2("字段")

rs1.close
rs2.close

set rs1=nothing
set rs2=nothing

conn.close
set conn=nothing