📄 selectreadatt.asp
字号:
<%dim ThisKey
ThisKey = "a"
%>
<!--#include file="../inc/permission.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/const.asp"-->
<%
ReadAtt=trim(request("ReadAtt"))
set rs=server.createobject("ADODB.RecordSet")
%>
<HTML>
<HEAD>
<TITLE>用户分管部门</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../CSS/main.css">
<Script Language="JavaScript">
function ChkedAll(){
for(var i=0;i<window.form1.ReadAtt.length;i++){
window.form1.ReadAtt[i].checked=true;
}
}
function UnChkedAll(){
for(var i=0;i<window.form1.ReadAtt.length;i++){
window.form1.ReadAtt[i].checked=false;
}
}
function SelectedData(){
num=0
ReadAtt=""
for(var i=0;i<form1.ReadAtt.length;i++){
if(form1.ReadAtt[i].checked){
num=num+1
if(num==1){
ReadAtt=window.form1.ReadAtt[i].value;
}
else{
ReadAtt=ReadAtt+","+window.form1.ReadAtt[i].value
}
}
}
window.opener.Rightfrm.ReadAtt.value=ReadAtt
}
</Script>
</HEAD>
<BODY bgcolor="#ffffff" topmargin=5 leftmargin=0>
<table border=0 cellpadding=0 cellspacing=0 width=510 align=center>
<tr>
<td align=left style="line-height:12pt;">选择特殊浏览权限</td>
</tr>
</table>
<table border=0 cellpadding=0 cellspacing=1 width="510" align=center valign=middle bgcolor="#336699">
<form name="form1" method=post action="">
<%
rs.open "select AttributeID,Attribute,DaiHao from tblAttribute2 order by AttributeID,DaiHao",conn,1,1
do while not rs.eof
%>
<tr>
<%
for i=1 to 4
if not rs.eof then%>
<td align=left bgcolor="#ffffff"><input type=checkbox name=ReadAtt value="(<%=rs("AttributeID")%>:<%=rs("DaiHao")%>)"<% if ReadAtt<>"" then
if instr(1,ReadAtt,"("&rs("AttributeID")&":"&rs("DaiHao")&")",1)>0 then%> checked<%end if
end if%>><%=trim(rs("Attribute"))%></td>
<%
rs.movenext
else
%>
<td bgcolor="#ffffff"> </td>
<%
end if
next
%></tr><%
loop
rs.close
set rs=nothing
%>
<tr>
<td colspan=4 bgcolor="#ffffff">
<input type=button name="CheckedAll" value="全选" onclick="javascript:ChkedAll();">
<input type=button name="UnCheckedAll" value="清除" onclick="javascript:UnChkedAll();">
<input type=button name="Submit" value="确定" onclick="javascript:SelectedData();self.close();">
</td>
</tr>
</form>
</table>
</BODY>
</HTML>
<!--#include file="../inc/close.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -