调用俩个库的问题

[wuyouqinger]

如果其中一个库是用这样调的<!--#include file="conn.asp"-->
下面我想再调用一个就用这样写了 测试是错的<%
dim Db
Db = "data/dvbbs78.asp"
On Error Resume Next
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if
set rs_t=server.createobject("adodb.recordset")
sqltext="select top 7 * from Dv_Board order by id desc "
rs_t.open sqltext,conn,1,1
%>

[KimSoft]

set conn1=server.createobject("ADODB.CONNECTION")

两个conn的名称不要一样。rs名称也不一样就没有问题了。

[lray]

Conn要不一样的，想要用那个库就要用那个Conn，recordset可以一样，只要每次Open完Close就可以了

[笨笨兔兔兔兔兔]

是的两个conn对象就可以了

[wuyouqinger]

谢谢大家
你们的意思是 只要conn不一样就可以了
同样用了<!--#include file="conn.asp"-->来调第一个 调再一个 就在它的目的地<%
dim Db
Db = "data/dvbbs78.asp"
On Error Resume Next
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
set conn1=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn1.open connstr
end if
set rs_t=server.createobject("adodb.recordset")
sqltext="select top 7 * from Dv_Board order by id desc "
rs_t.open sqltext,conn1,1,1
%>
写可以了吧