asp报错 ADODB.Recordset 错误 '800a0bb9'
ADODB.Recordset错误'800a0bb9'参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。/a/admin.asp,行5这个文件的文件的全部代码,...
ADODB.Recordset 错误 '800a0bb9'
参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。
/a/admin.asp,行 5
这个文件的文件的全部代码,帮忙看一下!
<%
StrSQL="DBQ="+server.mappath("data.mdb")+";DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open StrSQL
set connrs=server.CreateObject("adodb.recordset")
connrs.open "select * from install",conn,1,1
adv=connrs("adv")
footer=connrs("footer")
webtitle=connrs("title")
keywords=connrs("keywords")
description=connrs("description")
top=connrs("top")
menu=connrs("menu")
pagesize=connrs("pagesize")
pagelinenum=connrs("pagelinenum")
imgwh=connrs("imgwh")
softsort=connrs("softsort")
ranknum=connrs("ranknum")
connrs.close
%> 展开
参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。
/a/admin.asp,行 5
这个文件的文件的全部代码,帮忙看一下!
<%
StrSQL="DBQ="+server.mappath("data.mdb")+";DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open StrSQL
set connrs=server.CreateObject("adodb.recordset")
connrs.open "select * from install",conn,1,1
adv=connrs("adv")
footer=connrs("footer")
webtitle=connrs("title")
keywords=connrs("keywords")
description=connrs("description")
top=connrs("top")
menu=connrs("menu")
pagesize=connrs("pagesize")
pagelinenum=connrs("pagelinenum")
imgwh=connrs("imgwh")
softsort=connrs("softsort")
ranknum=connrs("ranknum")
connrs.close
%> 展开
1个回答
展开全部
<%
StrSQL="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data.mdb")
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
conn.open StrSQL
set connrs = server.CreateObject("adodb.recordset")
connrs.open "select * from install",conn,1,1
adv=connrs("adv")
footer=connrs("footer")
webtitle=connrs("title")
keywords=connrs("keywords")
description=connrs("description")
top=connrs("top")
menu=connrs("menu")
pagesize=connrs("pagesize")
pagelinenum=connrs("pagelinenum")
imgwh=connrs("imgwh")
softsort=connrs("softsort")
ranknum=connrs("ranknum")
connrs.close
%>
StrSQL="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data.mdb")
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
conn.open StrSQL
set connrs = server.CreateObject("adodb.recordset")
connrs.open "select * from install",conn,1,1
adv=connrs("adv")
footer=connrs("footer")
webtitle=connrs("title")
keywords=connrs("keywords")
description=connrs("description")
top=connrs("top")
menu=connrs("menu")
pagesize=connrs("pagesize")
pagelinenum=connrs("pagelinenum")
imgwh=connrs("imgwh")
softsort=connrs("softsort")
ranknum=connrs("ranknum")
connrs.close
%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询