我为什么不能修改数据库??????急救!!!!!!!

来源:百度知道 编辑:UC知道 时间:2024/05/30 11:10:37
dim o_id
o_id=request.QueryString("o_id")

dim action
action=request.QueryString("action")

select case action
case "del"

conn.execute "delete from order_info where o_id="&o_id
response.write"<script>alert('删除成功')</script>"
response.redirect request.servervariables("HTTP_REFERER")

case "update"
set rso=server.CreateObject("adodb.recordset")
rso.open"select from order_info where o_id="&o_id,conn,1,3

rso("name")=trim(request("name"))
rso("handset1")=trim(request("pcs1"))
rso("handset2")=trim(request("pcs2"))
rso("handset3")=trim(request("pcs3"))
rso.update
rso.close
set rso=nothing
response.redirect request.servervariables("HTTP_REFERER")
end select

如果是ACCESS数据库,需要给服务器上的相应文件夹(不仅仅是mdb数据库文件)添加修改的权限,因为在修改时,还要在mdb文件所在的文件夹里生成一个临时文件。
<br>在本地你是以管理员身份登录,拥有最大的权限,因此不存在这样的问题。

rso.open"select from order_info where o_id="&o_id,conn,1,3
改成rso.open"select * from order_info where o_id="&o_id,conn,1,3 试试。你的数据集中没有字段,当然无法更新了