急急急~~~帮忙看一下，数据苦连接出错~~~~
ADODB.Recordset 错误 '800a0bb9'
应用程序使用的参数或者类型不正确，或者不在可以接受的范围之内，要不就是与其他数据冲突。
/hc/jr2.asp, 行33
代码如下~~~~~~~
set dbconnection=server.createobject("adodb.connection")
dbpath=server.mappath("db1.mdb")
dbconnection.open"driver={Microsoft Access Driver (*.mdb)};dbq=" & dbpath
set rs=server.createobject("adodb.recordset")
str="SELECT * FROM table1 WHERE name= '"&request("name")&"'"
rs.Open str,conn,1,1
if rs.bof and rs.eof then
conn.Execute("insert into table1(xm,bj,dz,yb,qq,em,t1,t2,sj,bz) values(xm,bj,dz,yb,qq,em,t1,t2,sj,bz)")
else
conn.Execute("update table1 set xm = xm,bj = bj,dz = dz,yb = yb,qq = qq,em = em,t1 = t1,t2 = t2,sj = sj,bz = bz where name = name")
end if
问题点数：20、回复次数：15Top
1 楼cmsoft（韦小宝是我的老乡)(草根在路上）回复于 2002-10-27 13:01:38 得分 0
conn.Execute("insert into table1(xm,bj,dz,yb,qq,em,t1,t2,sj,bz) values('"&xm&"','"&bj&"',……)")
如果是数字型的就去掉对应的''Top
2 楼hcyq（错觉）回复于 2002-10-27 13:11:46 得分 0
还是老问题~~~~~你说的不能用~~Top
3 楼cmsoft（韦小宝是我的老乡)(草根在路上）回复于 2002-10-27 13:14:22 得分 0
下面的也要改啦
update table1 set xm = '"&xm&"',……Top
4 楼cmsoft（韦小宝是我的老乡)(草根在路上）回复于 2002-10-27 13:15:32 得分 0
其中后面的xm,bj……都得是变量，要有值才行Top
5 楼hcyq（错觉）回复于 2002-10-27 13:18:34 得分 0
是的，xm bj 这些都是变量~~~从form读出的值啊~~Top
6 楼hcyq（错觉）回复于 2002-10-27 13:22:22 得分 0
还是老问题啊~~`Top
7 楼cmsoft（韦小宝是我的老乡)(草根在路上）回复于 2002-10-27 13:25:07 得分 0
把你改的帖出来看看Top
8 楼hcyq（错觉）回复于 2002-10-27 13:27:07 得分 0
刚开始学asp呵呵~~想做个好玩的东西~~哎~真费劲`·
<html><head><title>班级通讯录自动更新系统1.0</title></head><body>
<%
xm = request.form("xm")
bj = request.form("bj")
dz = request.form("dz")
yb = request.form("yb")
qq = request.form("qq")
em = request.form("em")
t1 = request.form("t1")
t2 = request.form("t2")
sj = request.form("sj")
bz = request.form("bz")
if xm = "" then
response.write"<center><font color=red size=5>请输入您的大名:)"%>
<a href="javascript: location=history.back()">返回</a>重新填写!</font></center>
<%
else
response.write"你的信息如下:"&"<br>"
response.write "姓名:"&Request.form("xm")&"<br>"
response.write "班级:"&Request.form("bj")&"<br>"
response.write "QQ号码:"&Request.form("qq")&"<br>"
response.write "E-mail:"&Request.form("em")&"<br>"
response.write "电话(家):"&Request.form("t1")&"<br>"
response.write "电话(校):"&Request.form("t2")&"<br>"
response.write "手机:"&Request.form("sj")&"<br>"
set dbconnection=server.createobject("adodb.connection")
dbpath=server.mappath("db1.mdb")
dbconnection.open"driver={Microsoft Access Driver (*.mdb)};dbq=" & dbpath
set rs=server.createobject("adodb.recordset")
str="SELECT * FROM table1 WHERE xm= xm"
rs.Open str,conn,1,1
if rs.bof and rs.eof then
conn.Execute("insert into table1(xm,bj,dz,yb,qq,em,t1,t2,sj,bz) values('"&xm&"','"&bj&"','"&dz&"','"&yb&"','"&qq&"','"&em&"','"&t1&"','"&t2&"','"&sj&"','"&bz&"')")
else
conn.Execute("update table1 set bj = '"&bj&"',dz = '"&dz&"',yb = '"&yb&"',qq = '"&qq&"',em = '"&em&"',t1 = '"&t1&"',t2 = '"&t2&"',sj = '"&sj&"',bz = '"&bz&"' where xm = '"&xm&"'")
end if
response.write xm&"同学,您的信息已经加入数据库,其他人可以在此查到你的最新通信地址和其他联系方式,希望当您的相关联系方式变化时能及时更新!"
%>
<% end if%>
</body></html>Top
9 楼cmsoft（韦小宝是我的老乡)(草根在路上）回复于 2002-10-27 13:30:36 得分 20
str="SELECT * FROM table1 WHERE xm= '"&xm&"'"Top
10 楼cmsoft（韦小宝是我的老乡)(草根在路上）回复于 2002-10-27 13:31:42 得分 0
rs.Open str,dbconnection,1,1Top
11 楼cmsoft（韦小宝是我的老乡)(草根在路上）回复于 2002-10-27 13:32:25 得分 0
全部的conn.Execute
改为dbconnection.exectueTop
12 楼hcyq（错觉）回复于 2002-10-27 13:35:00 得分 0
还是有问题~~现在提示：
Microsoft VBScript 运行时错误 错误 '800a01a8'
缺少对象: ''
/hc/jr2.asp, 行35
Top
13 楼cmsoft（韦小宝是我的老乡)(草根在路上）回复于 2002-10-27 13:36:01 得分 0
35行是那行代码啊？Top
14 楼hcyq（错觉）回复于 2002-10-27 13:40:37 得分 0
好了~~多谢你！！
Top
15 楼hcyq（错觉）回复于 2002-10-27 13:41:31 得分 0
'"&t1&"' 这些东西部替换也可以吧？Top
