<% dim db,conn,connstr db="#chenhao1000hqit.asp" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db) conn.Open connstr %> <% set rs=server.createobject("adodb.recordset") sql="delete * from anli where id="&request.querystring("id") rs.open sql,conn,1,1 response.redirect ("admin_index.asp") %> 错误提示： Microsoft JET Database Engine (0x80004005) 无法从指定的数据表中删除。 /web/myweb/pic/delete.asp, 第 20 行

sql="delete from anli where id="&amp;request.querystring("id")
conn.execute sql

晕~~~~~~~低级错误  丢脸了

细心哦

在rs.open sql,conn,1,1
后加rs.update

这样不行吧

[此贴子已经被作者于2005-10-11 9:52:39编辑过]

还有这里吧
rs.open sql,conn,1,1
是只读哟，呵呵

&lt;%
set rs=server.createobject("adodb.recordset")
sql="delete * from download where id="&amp;request.querystring("id")
rs.open sql,conn,1,1
response.redirect ("admin_index.asp")
%&gt;

我用1可以删除 记录

sql="delete * from anli where id="&amp;request.querystring("id")