<form action="" name="del">
<%Set rs= Server.CreateObject("ADODB.Recordset")
rs.open "select * from 表 order by id desc",conn,1,3
do while not rs.eof
if request.form("usertel")=1 then
rs.delete
else%>
<input name='usertell' type='checkbox' onclick="" id="usertell" value=1><%=rs(""usertell)%><br>
<%rs.movenext
rs.update
rs.close
set rs=nothing%>

<!--#include file="conn.asp" -->
<%Set rs= Server.CreateObject("ADODB.Recordset"
rs.open "select * from 表 order by id desc",conn,1,3 for i=1 to rs.pagesize %>
<tr>
<form action="" name="del">
<td align="center">
<% if request.form("usertel"=1 then
rs.delete
rs.update
else%>
<input name='usertell' type='checkbox' onclick="" id="usertell" value=1>
<% end if %>
     </td>
     </form>
rs.close
set rs=nothing%>
我的问题:在CHECOBOX中选中后,没有删除记录,我把上述代码何存在1.ASP文件中,然后
<a href="1.asp">删除记录</a>.
我就是想通过点击某个链接删除记录

然后khDel.asp这样写：
<%if request("action")=del then
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open "select * from 表 where id="&request("id")&" order by id desc",conn,1,3
rs.delete
rs.update
rs.close
set rs=nothing
end if%>

1.asp中有如下代码:
<td align="center"> <input name='id' type='checkbox' onclick="" id="id" value=<%= rs("id" %>></td>
del.asp中删除代码是这样写的:
id=request.QueryString("id"
sqlstrDel="Delete From table_name where ID In ("& ID &""
conn.Execute(sqlstrDel)

我遇到的问题是ID值取不到,无法删除,我始终找不到错在那里?请指教啊

蓝鲸在上个帖子中说

引用:

---

首先绑定的checkbox的ID为"delID"，执行提交后，分析以下代码

if Request("DelID") <> "" then
  arrDelID = Split(Request("DelID"), ",")
  strDelID = "("
  for i = 0 to UBound(arrDelID)
    if strDelID <> "(" then strDelID = strDelID & ","
	strDelID = StrDelID & arrDelID(i)
  next
  strDelID = strDelID & ")"
  
  sqlDel = "DELETE FROM Article_Subject WHERE SubjectID IN " & strDelID
  conn.Execute sqlDel
end if

---

为什么要先Split再组合?
直接"delete from table where id in("&Request.Form("delid"&""

我在1.asp页面中表单是这样的:
<form action="" method="post" ><td align="center">
<input name='delid' type='checkbox' onclick="" id="delid" value="<%= rs("id" %>"></td></form>
但我并没有提交按钮,只是在页面某处设置了一个链接
<td align="center"><a href="2.asp.asp">删除记录</a></td>
然后在2.asp中的删除代码是这样写的:
DelID = Request("DelID"
sqlDel = "DELETE FROM zongbiao WHERE id IN " & DelID
conn.Execute sqlDel
现在问题仍然是ID的值取不到,无法删除.
我反复看代码,问题不是在2.asp中,肯定是在1.asp中,是不是form中checkbox的ID值非要设一个提交按钮才能被2.asp取到表单中的ID值呢?