ADODB.Recordset 错误 '800a0bb9'
参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。
下面是代码:
<%
name=request("text2")
if name<>"" then
response.write "text2不能为空"
response.end
end if
logo=request("text3")
reason=request("text4")
measure=request("text5")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" &_
Server.MapPath("message.mdb")
Conn.Open
Set rs=Server.CreateObject("ADODB.Recordset")
Set rs1=Server.CreateObject("ADODB.Recordset")
SQL="SELECT*FROM message where 车牌号='"&name&"'"
rs.Open SQL,Conn,1,3
if rs.EOF or rs.bof then
rs1.Open "message",conn,1,3 '这句错误
rs1.addnew array("编号","车牌号","牌子","扣留原因","处罚措施"),_
array(number,name , logo , reason , measure)
%>
<script language="vbscript">
alert("信息添加成功")
window.location.href="cgs.asp"
</script>
<%
end if
rs.Close
set rs=nothing
%>
错误语句: rs1.Open "message",conn,1,3
求解
参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。
下面是代码:
<%
name=request("text2")
if name<>"" then
response.write "text2不能为空"
response.end
end if
logo=request("text3")
reason=request("text4")
measure=request("text5")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" &_
Server.MapPath("message.mdb")
Conn.Open
Set rs=Server.CreateObject("ADODB.Recordset")
Set rs1=Server.CreateObject("ADODB.Recordset")
SQL="SELECT*FROM message where 车牌号='"&name&"'"
rs.Open SQL,Conn,1,3
if rs.EOF or rs.bof then
rs1.Open "message",conn,1,3 '这句错误
rs1.addnew array("编号","车牌号","牌子","扣留原因","处罚措施"),_
array(number,name , logo , reason , measure)
%>
<script language="vbscript">
alert("信息添加成功")
window.location.href="cgs.asp"
</script>
<%
end if
rs.Close
set rs=nothing
%>
错误语句: rs1.Open "message",conn,1,3
求解