คือผมมี SouceCode ตามข้างล่างนี้นะครับ คือมันจะทำการวน loop เพื่อแสดงข้อมูลต่างๆ ออกมาแล้วตามด้วย Checkbox ของข้อมูลกลุ่มนั้นด้วยนะครับ ปัญหาคือว่า เวลาที่ผม ไม่ได้ทำการเลือก Checkbox อันใดเลยแล้วเวลาผม submit มันจะ Error นะครับ ไม่ทราบว่าพอจะมีวิธีแก้หรือป่าวครับ กรุณาช่วยผมหน่อยนะครับ

  <%
   With Response
   .Write "<form method=post action='Delete_1_UserTraffic.asp'>"
   .Write "<table>"
   .Write "<colgroup width=130></colgroup>"
   .Write "<colgroup width=270></colgroup>"
   .Write "<colgroup width=100></colgroup>"
   .Write "<colgroup width=150></colgroup>"
   .Write "<colgroup width=150></colgroup>"
   .Write "<colgroup width=70></colgroup>"
   .Write "<tr bgcolor=#CCCCCC><th><font size=2>รหัสพนังงานจราจร</font></th><th><font size=2>ชื่อพนังานจราจร</font></th><th><font size=2>ชื่อเล่น</font></th><th><font size=2>ตำแหน่ง</font></th><th><font size=2>เบอร์โทรศัพท์</font></th><th><font  size=2>ลบข้อมูล</font></th></tr>"
   End With

sum=0
rs.Requery
if  not rs.Eof then
    

   Do While Not rs.Eof
   With Response
                          .Write"<tr bgcolor=daeef5><td align=center>" &"<font size=2>"& rs("Traffic_ID") &"</font>"& "</td>"
       .Write"<td align=center>" &"<font size=2>"& rs("TrafficName") & "</font>"&"</td>"
       .Write"<td align=center>" & "<font size=2>"&rs("NickName") & "</font>"&"</td>"
       .Write"<td align=center>" & "<font size=2>"&rs("Traffic_Position") & "</font>"&"</td>"
       .Write"<td align=center>" & "<font size=2>"&rs("Tel") & "</font>"&"</td>"
        .Write"<td align=center><input type=checkbox name=id  value=" & rs("ID") & "></td>"
                            sum=sum+1
 End With
 rs.MoveNext
 Loop 
 else   Response.Write("<font color=red size=5>"&"ไม่มีข้อมูลของเจ้าพนักงานจราจรในฐานข้อมูล"&"</font>")
 end if
 rs.Close
 Response.Write"<tr><td></td><td></td><td></td><td></td><td align=center bgcolor=#ccffcc><b><font size=2>รวมรายชื่อทั้งหมด</font></b></td><td bgcolor=#ccffcc align=right><font color=red>&nbsp;<b><font size=2>" & sum & "</font></b></font></td></tr><br>"
 Response.Write "</table>"
 Set rs=Nothing
 
               
     Response.Write "<input type=submit value=ลบข้อมูลเจ้าพนักงานจราจร  onkeydown='return Filter_Keyboard();'>"
     Response.Write "</form>"
 %>

ใช้ Javascript ช่วยครับ
<script language="javascript">
function validate(obj){
    var check = true;
    for(i=0; i<obj.elements.length; i++){
       if(!obj.elements[i].checked){
          check = false;
       }
    }
   
    if(check){
       //OK
       return true;
    }else{
       //Not check any box
       alert("Please check some box");
       return false;
    }
}
</script>

ส่วนใน form นั้นต้องใส่ handle event ไว้ด้วยครับ
<form action="..." onsubmit="return validate(this)">
...
</form>

อธิบายนะครับ
การทำงานของ script นั้นจะรับค่าเราจะอ้างอิงจากตัวแปรนั้นหาความยาวทั้งหมดของ element แล้ววนลูปหาว่ามีอันไหนโดนเช็กหรือยัง

ส่วนของ form นั้นก็ใส่ handle event เพื่อใช้ในการ submit ว่าเมื่อมีการ submit จะมีการเรียกฟังก์ชั่น validate โดยส่ง object form ไปเป็น argument ด้วยครับ

ลองนำไปประยุกต์ดูนะครับ