上海新世纪双语学校:不能更新查询,因为它不含可用作键的搜索列

来源:百度文库 编辑:神马品牌网 时间:2024/05/03 05:08:55
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
不能更新查询,因为它不含可用作键的搜索列。 ju8 /suit_save.asp, 第 16 行
请问这个怎么解决啊?

set rs_money=server.CreateObject("adodb.recordset")
sql="select money from love_user where username='"&Session("Current_user")&"'"
rs_money.open sql,conn,1,3
if rs_money.eof then
response.write"您还未登陆 或者 已经 超时退出,请重试!"
response.End()
end if
if rs_money("money") < session("sum") then
response.write"对不起!您帐户的余额不足以支付您选购的商品,请充值后再试!"
response.end
else
rs_money("money")=rs_money("money")-session("sum")
rs_money.update
end if
rs_money.close
set rs_money=nothing

第16句是这个,rs_money.update 谁帮忙解决一下! 小弟万分感激!

set rs_money=server.CreateObject("adodb.recordset")
sql="select money from love_user where username='"&Session("Current_user")&"'"
rs_money.open sql,conn,2,3
if rs_money.eof then
response.write"您还未登陆 或者 已经 超时退出,请重试!"
response.End()
else
if rs_money("money") < session("sum") then
response.write"对不起!您帐户的余额不足以支付您选购的商品,请充值后再试!"
response.end
else
rs_money("money")=rs_money("money")-session("sum")
rs_money.update
end if
rs_money.close
set rs_money=nothing
end if

若是XP系统,可试用系统还原解决。用它容易见效且不费时间。方法:右键“我的电脑”——属性——系统还原——设置——逐一关闭其它盘——监视C盘——确定。然后点“开始”——程序——附件——系统工具——系统还原。系统会提示你一步步恢复原点而恢复正常的。

select money from 改成 select * from 你试试