同志们好！
各位高人本人在打开网页是总出现错误信息“对象打开时，不允许操作。”请帮忙看看，并最好帮忙修改一下。谢谢!!
<%
dim cnn,rs,pi,exec
pi=request.querystring("编号")
set cnn=server.createobject("adodb.connection")
cnn.open"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("数据库.mdb") & ";Persist Security Info=False;Jet OLEDB:Database Password=123"
cnn.open
set rs=server.createobject("adodb.recordset")
exec="select * from 性能表 where 编号 = "&pi&""
rs.open exec,cnn,1,1
%>

<%
dim cnn,rs,pi,exec
pi=request.querystring("编号")
set cnn=server.createobject("adodb.connection")
cnn.open"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=" & server.MapPath("数据库.mdb") & ";Persist Security
Info=False;Jet OLEDB:Database Password=123"

cnn.close '加上这句看看

cnn.open
set rs=server.createobject("adodb.recordset")
exec="select * from 性能表 where 编号 = "&pi&""
rs.open exec,cnn,1,1
%>