转载自品略图书馆 http://www.pinlue.com/article/2020/06/0308/0210674753046.html
js文件
// JavaScript Document
function checkAll(e,itemName){ //全选函数
var aa=document.getElementsByName(itemName);
for(var i=0;i<aa.length;i++){
aa[i].checked=e.checked;
}
}
function checkItem(e,allName){ //当选取或取消选取没一个复选框时调用的函数
var all=document.getElementsByName(allName)[0]; //全选框对象
if(!e.checked){ //如果是取消选取那么全选框就取消选取
all.checked=false;
}
else{ //如果是选取,就要判断其他是否都已经全部选取了
var aa=document.getElementsByName(e.name);
for(var i=0;i<aa.length;i++){
if(!aa[i].checked){//如果有一个没有选上,那么就返回
return;
}
}
all.checked=true;//如果其他都选上了,全选框就要选上
}
}
——————————————————————————————————
list.asp文件
<!--#include file="inc/connSQL.asp"-->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>列表</title>
<script type="text/javascript" src="js/common.js"></script>
</head>
<body>
<form action="del.asp" method="post">
<table cellpadding="1px" cellspacing="1px" border="1">
<tr>
<td></td><td>序号</td><td>姓名</td><td>性别</td><td>年龄</td><td>班级</td>
</tr>
<%
Set rs=Server.CreateObject("ADODB.RecordSet")
sqlStr="Select * From T_Student"
rs.Open sqlStr,conn,1,1
Do While Not rs.Eof
%>
<tr>
<td><input type="checkbox" name="id" value=<%=rs("id")%> οnclick="checkItem(this,"idAll")" /></td>
<td><%=rs("id")%></td>
<td><%=rs("name")%></td>
<td><%=rs("gender")%></td>
<td><%=rs("age")%></td>
<td><%=rs("class")%></td>
</tr>
<%
rs.MoveNext
Loop
rs.close
set rs=nothing
%>
</table>
<input type="checkbox" name="idAll" οnclick="checkAll(this,"id")" />全选
<input type="button" value="删除" οnclick="submit()">
</form>
</body>
</html>
______________________________________________________________________________
del.asp文件
<!--#include file="inc/connSQL.asp"-->
<%
ids=request.Form("id")
sqlStr="Delete From T_Student Where id in ("&ids&")"
conn.Execute(sqlStr)
%>
<div align="center">删除记录成功<a href="list.asp" target="_self">返回列表</a></div>