ASP删除数据问题

来源：百度知道 编辑：UC知道 时间：2024/06/05 02:09:01
<%
Dim rs, strConn,strsql
set strConn=Server.CreateObject("ADODB.Connection")
strConn.open "Dbq=" & Server.Mappath("address.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"
set rs=Server.CreateObject("ADODB.Recordset")
Sql ="Delete From users Where name='" & name & "' "
strconn.execute(Sql)
rs.update
Response.Redirect "list.asp"
%>
运行提示。
ADODB.Recordset (0x800A0E78)
对象关闭时，不允许操作。
rs.update
----------------------------------
按照1楼 加上一样提示：
ADODB.Recordset (0x800A0E78)
对象关闭时，不允许操作。
rs.update
--------------------------------------
按照2楼 替换 提示：
同上
-------------------------------------
按照3楼 去掉.rs.update
但是不删除.也不报错..

你的数据集没有打开。所以不能进行操作

在

strconn.execute(Sql)

之前加上：

rs.open Sql,strConn,1,3

<%
Dim rs, strConn,strsql
set strConn=Server.CreateObject("ADODB.Connection")
strConn.open "Dbq=" & Server.Mappath("address.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"
strconn.exectue(sql)
response.write"<script>alert("delete sucess!")<script/>"
Response.Redirect "list.asp"
%>

你的数据库没有连接，所以不能进行操作，把下面的代码放在最前面，并把数据库地址填写完整。试试吧，一定能成功。
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("shujuku.mdb")
%>

rs.update根本就不需要呀，去掉就是了。