Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e10'
[Microsoft][ODBC Microsoft Access 驱动程序] 参数不足,期待是 2。
/mywork/TMP3tmisbu5i0.asp, 行133
请各位大侠帮忙,(如需要原代码可声明)谢谢。
...全文
618打赏收藏
关于win98+pws+access的问题
小弟初学asp做网上考试,数据库是access,当新用户提交注册信息时,发生以下错误。 Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e10' [Microsoft][ODBC Microsoft Access 驱动程序] 参数不足,期待是 2。 /mywork/TMP3tmisbu5i0.asp, 行133 请各位大侠帮忙,(如需要原代码可声明)谢谢。
if confirm("您的登记信息将被提交,确认吗?")<>true then
window.event.returnValue=false
exit sub
End If
end sub
-->
</script>
</p>
<div align="center">
<input name="Submit" onclick=go() type="submit" value=" 提交 ">
<input type="reset" name="Submit2" value=" 取消 ">
</div>
</form>
<%@ language=VBscript %>
<%
dim user,pwd,sname,sex,major,sclass,tel,mail,note
user=Request("t1")
pwd=request("t2")
sname=Request("t3")
sex=request("t4")
major=request("t5")
sclass=request("t6")
tel=request("t7")
mail=request("t8")
note=request("t9")
dim checksql
dim rs
dim conn
set rs=server.CreateObject("ADODB.RecordSet")
set conn=server.createobject("ADODB.CONNECTION")
connstr = "DBQ=" + server.mappath("access/datebase.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
conn.Open connstr
checksql="select * from 用户 where name='"& sname &"' and pwd='"& pwd &"'"
set rs=conn.execute(checksql)
checksql="insert into 用户(用户名,密码,姓名,性别,专业,班级,电话,邮箱,备注) values('"&user&"','"&pwd&"','"&sname&"','"&sex&"','"&major&"','"&sclass&"','"&tel&"','"&mail&"','"¬e&"')"
set rs=conn.Execute(checksql)
if err.number <> 0 then
alert "无法保存,数据库操作出错:!"
else
alert "提交成功!"
end if
set rs=nothing
set conn=nothing
%>