<SCRIPT LANGUAGE="JavaScript">   
  <!--   
  function CheckForm(n)   
  {   
  for(i=1;i<=n;i++)   
  {   
   var flag=false;   
   var obj=eval("form1."+i);   
   for(j=0;j<obj.length;j++)   
   if(obj[j].checked){   
   flag=true;   
   continue;   
   }   
  if(!flag){   
  alert("您未对第"+i+"个项目做出选择!"); 
 obj[i].focus();
  return   false;   
  }                   
  }   
   return   true;   
  }   
  //-->   
  </SCRIPT><%
Dim sql
sql=" select * from jobs order by id "
Dim rs
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,1
dim h
h=rs.recordcount
%>
<table width="98%" border="0" cellspacing="0" cellpadding="0"><tr><td align="center" class="l24">
<form id="form1" name="form1" action="cp_save.asp" method="post" onSubmit="return CheckForm(<%=h%>);">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<%
if rs.eof then
response.write "<tr><td colspan='2'><font color='red'>系统中还没有录入任何信息!</font></td></tr>"
else
dim j
j=1
for j=1 to h
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0"><tr>
<td width="47%" align="left"><font style="font-size:14px;">部门/科室:<%=rs("job")%></font></td>
<td width="42%" align="left"><font style="font-size:14px;">所属部门:
<%if rs("type")<>"" then%><%=rs("type")%><%else%>无<%end if%></font></td>
<td width="11%" height="26" colspan="4" align="left">
<input type="radio" name="<%=j%>" value="1">√  
<input type="radio" name="<%=j%>" value="0">×
</td></tr></table>
<%
rs.movenext
next
end if
%></td></tr></table>
<input type="submit" name="button" id="button" value="提交">
</form>不选择第一条,选择第2条、第3条一直到N条。都是没问题的。。 
只要选择了第一条,虽然提示第2条没选择,但是还是提交成功了...
应该是任意一条不选择都提示,且不提交的 
可是只要选择了第1条。他就提交了!~~ 
纳闷!~~