yy感谢大哥航母视频:ASP用复选框删除的问题!

<!-- #include file="conn.asp" -->

<% set rs=server.CreateObject("adodb.recordset")
exec="select * from news order by nclass asc,id desc"
rs.pagesize=10
rs.open exec,conn,3,2
%>

<%
do while not rs.eof
%>

是否删除：
<%if rs("delete")=-1 then%>
<input type="checkbox" name="<%=rs("id")%>" value="on">
<%else%>
<input type="checkbox" name="<%=rs("id")%>" value="off">
<%end if%>

<%
rs.movenext
loop
%>

<input type="submit" value="提 交" name="B1">
<input type="reset" value="清 除" name="B2">

</form>

-----------------------------------------------------------------

<%
if Request.ServerVariables("REQUEST_METHOD")="POST" then
if not rs.bof then
rs.movefirst
end if

do while not rs.eof

n=trim(cstr(rs("news_id")))
if request.form(n)="OFF" then
rs.delete
rs.update
end if

rs.movenext
loop

response.redirect "delete.asp"
rs.close
end if
response.flush
%>

-----------------------------------------------------------------

没有报错 但是删除无效 急求解!谢谢
<%if rs("delete")=-1 then%>
源程序代码的意思是 判断删除标志 添加的时候 默认的是值是
delete=-1

我也不很明白 不过我弄了个很简单的就可以运行

<input type="checkbox" name="id" value="<%=rs("id")%>">

--------------------------------------------------------
<%
exec="delete * from news where id in ("&request.Form("id")&")"
conn.execute exec

%>
--------------------------------------------------------

我确实也不明白源程序为什么那么麻烦