请教打开数据库问题
同志们好!各位高人本人在打开网页是总出现错误信息“对象打开时,不允许操作。”请帮忙看看,并最好帮忙修改一下。谢谢!!
<%
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
%>