radio按键是否为checked的问题 - ASP技术论坛

放飞心情

等　级：新手上路
帖　子：19
专家分：0
注　册：2005-6-10

楼主

问题点数：0 回复次数：4

radio按键是否为checked的问题

<%@ Language=VBScript %> <html>

<head> <title>用户组栏目授权</title> <meta name="generator" content="BPHTML 2002 Build 31a"> <meta name="date_time" content="2005-4-1 10:26:38"> <meta name="dc.creator" content="BPHTML 2002 Build 31a"> <meta name="dc.title" content="用户组栏目授权"> </head> <link rel="stylesheet" type="text/css" href="..css/tablePage.CSS">

<% opendb my '连接数据库 Dim m %>

<table ></div><tr><td bgcolor="#5794E4" > <font style="font-family: 宋体;font-size: 12pt;color:#333333"></font></td></tr><tr><td width=990>　</td></tr> <form method="POST" action="power_mlqx.asp" name="form"> <tr> <td align=left bgcolor="#C8DFFF">请选择授权栏目： <select name="jdid" size="1"> <option value="0" name="aa">请选择授权栏目</option> <% sql="select JDID,JDMC from SYS_WEB02 " '查询语句 searchtable my,sql,rs ''查询数据库 if not rs.eof then ''如果有这个调查记录 for i=1 to rs.recordcount Response.Write("<option value="&rs("jdid")&" >"&rs("jdmc")&"</option>") rs.movenext next closetable rs ''关闭表 end if %> </select> </td> </tr> <TR> <td bgcolor="#C8DFFF" > <font style=font-size:12pt;color:#333333 face=宋体>请选择用户组：</font> <select name="yhzmc" size="1"> <option value="0" name="aa">请选择用户组</option> <% 'sql1="select YHZMC,YHZBT,YHZLX,FWSD,SFSD,SSYHZ,YHZSM from SYS_User01" sql1="select * from sys_user01" searchtable my,sql1,rs2 ''查询数据库 if not rs2.eof then ''如果有这个调查记录 for i=1 to rs2.recordcount ' yhm=rs2("yhm") gname=rs2("yhzmc") gnameqm=rs2("yhzbt") Response.Write("<option value="&gname&">"&gname&"["&gnameqm&"用户组]</option>") rs2.MoveNext next response.Write "</select>" closetable rs2 end if %> </select> <input type="submit" value="查找" name="B1" ID="Submit1" class="button"></td>

</form> <% temp=trim(request("yhzmc")) yhm=trim(request("yhm")) jdid=trim(request("jdid")) jdmc=trim(request("jdmc")) if temp<>"" then %> <tr> <form method="POST" action="power_mlqxsub.asp" name="form"> <input type="hidden" name="yhzmc" value="<%=temp%>" ID="Hidden1"> <input type="hidden" name="jdid" value="<%=jdid%>" ID="Hidden1"> <input type="hidden" name="jdmc" value="<%=jdmc%>" ID="Hidden1"> <input type="hidden" name="yhm" value="<%=yhm%>" ID="Hidden1"> <td valign="middle" align="left" width="15%" bgcolor="#C8DFFF"> <p align="center">授权信息</td></tr> <tr> <td align=left colspan="3" bgcolor="#C8DFFE"> <table border="0" cellpadding="0" cellspacing="0" id="table1" width="776" height="65"> <tr> <td valign="top" colspan="3"></td> <td width="73"></td> <td></td> <td></td> <td></td> <td></td> <td></td> <td height="15"></td> </tr>

<tr> <td align="center"> 授权用户</td> <td colspan="3" align="center"> 授权目录ID</td> <td width="111" align="center"> 不可访问</td> <td align="center">只读</td> <td align="center"> 只写</td> <td align="center">可审核</td> <td align="center">可授权</td> <td height="15"></td> </tr> <% 'dim i i=1 sql="select yhm,yhzmc from sys_user05 where yhzmc='"&temp&"' " changetable my,sql,rs ''查询数据库 response.write " <input type=hidden name='ctlgCount' value=" & rs.recordcount & ">" DO while not rs.eof %>

<tr> <td align="center" colspan="2"> <input style="border:0 none;; background-color:#C8DFFE; text-align:center; float:left" name="yhm_<%=i%>" value=<%=rs("yhm")%> size="15" > </td> <td align="left" colspan="2"> <input name="jdid_<%=i%>" value="<%=jdid%>" style="border:0 none;; background-color:#C8DFFE; text-align:center" size="11" ></td> <td align="center"><input type=radio name="checknum_<%=i%>" value=0 ></td> <td align="center" width="105"> <input type=radio name="checknum_<%=i%>" value=1> </td> <td align="center" width="105"><input type=radio name="checknum_<%=i%>" value=2> </td> <td align="center" width="105"><input type=radio name="checknum_<%=i%>" value=3> </td> <td align="center" width="105"><input type=radio name="checknum_<%=i%>" value=4> </td> <td height="20"></td> </tr> <% i=i+1 rs.movenext loop closetable rs Response.Write("</td></tr>")%> <tr> <td valign="top" colspan="9"> 　</td> <td height="15" width="12"></td> </tr> </table> </td></tr>

</td> </tr>

<% closedb my end if %> </body> </html> 上面的源码,我想实现的是,通过选择"授权栏目"和"用户组"查找出数据库中已经满足我选择的条件的权限radio是哪个为check

搜索更多相关主题的帖子: radio　checked　数据库　 meta　

2005-06-17 15:41

yms123

等　级：版主
威　望：209
帖　子：12488
专家分：19042
注　册：2004-7-17

第 3 楼

得分:0

可以用隐藏域来判断比如 <script language=JavaScript> function ButClk() { for(var i=0;i<document.fm.sex.length;i++) { if(document.fm.sex[i].checked) { document.fm.sexVal.value=document.fm.sex[i].value; } } document.fm.submit(); } </script> 以上代码写在<head></head>中一下写在<body></body>中 <form name=fm action=a.asp> <input type=radio name=sex value=male> <input type=radio name=sex value=female> <input type=hidden name=sexVal value=""> <input type=button value="提交" onClick="ButClk();"> </form> a.asp接收代码如下 <% IF Request.Form("sexVal")="male" Then Response.Write("性别为男") Else Response.Write("性别为女") End IF %> 红字的是代码的核心部分，同名的radio组成的是以一个但选框数组的形势组成的。

2005-06-17 22:49

yms123

等　级：版主
威　望：209
帖　子：12488
专家分：19042
注　册：2004-7-17

第 5 楼

得分:0

2005-06-18 23:25