📄 wnp_am_edit_gly.asp
字号:
<!--#include file="WNP_INCLUDE.ASP" -->
<link href="css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
unitLeftSameStep=session("UNIT_Jibie")*session("EveryStepNumber")
unitAllTempStep=(session("UNIT_Jibie")+1)*session("EveryStepNumber")
%>
<script language="javascript">
<!--
function checkamsearch(){
if(document.form1.WND_USER_UNITID.value==""){
alert("请正确选择单位！");
document.form1.WND_USER_UNITID.focus();
return false;
}
if(document.form1.WND_USER_UNITNAME.value==""){
alert("请正确选择用户！");
document.form1.WND_USER_UNITNAME.focus();
return false;
}
}
-->
</script>
<script language = "JavaScript"><!--------------------单位用户二级联动脚本------------------->
<%
dim count,AEuserpower
userid=request("WND_USER_UNITNAME")
limitType=session("WND_USER_TYPE")
sql = "SELECT * FROM WNT_USER where WND_USER_TYPE=22"
rs.open sql,conn,1,1
%>
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs("WND_USER_USERNAME"))%>","<%= trim(rs("WND_USER_UNITID"))%>","<%= Left(rs("WND_USER_ID"),10)%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changeclass(locationid)
{
document.form1.WND_USER_UNITNAME.length = 0;
var locationid=locationid;
var i;
document.form1.WND_USER_UNITNAME.options[0] = new Option('-----请选择用户-----','');
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
//alert(subcat[i][1]);
document.form1.WND_USER_UNITNAME.options[document.form1.WND_USER_UNITNAME.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<script language="javascript"><!------------------- 树形目录选择脚本 -------------------->
<!--
function checkChooseAm(checkNum){
var checkParents = checkNum;
var checkNameP = formUjInfo.elements[checkParents];
var maxNumber = formUjInfo.elements.length-1;
var checkStepP = checkNameP.value;
var checkTemp = checkNum;
var checkName = formUjInfo.elements[checkTemp];
var checkStep = checkName.value;
if(checkName.checked == false){
do{
checkName.checked = false;
checkName = formUjInfo.elements[++checkTemp];
if(checkTemp>maxNumber){break;}
}
while(checkName.value > checkStep);
}
else{
while(checkParents >= 0){
if(checkNameP.value < checkStepP){
checkNameP.checked = true;
--checkStepP;
checkNameP = formUjInfo.elements[--checkParents];
}
else{
checkNameP = formUjInfo.elements[--checkParents];
}
}
do{
checkName.checked = true;
checkName = formUjInfo.elements[++checkTemp];
if(checkTemp>maxNumber){break;}
}
while(checkName.value > checkStep);
}
}
//-->
</script>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="30" align="center" class="title1"> </td>
</tr>
</table>
<table width="760" height="500" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#fdfaf4" class="FPtalbe">
<tr>
<td valign="top">
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#fdfaf4" class="FPtalbe">
<form name="form1" method="post" action="?action=searchUser" onSubmit="javascript:return checkamsearch();">
<tr align="center" valign="bottom">
<td width="300" rowspan="2" valign="middle" class="texttitle"><span class="title1" style="font-size: 24px">用户权限分配</span><span style="font-size: 24px"> </span> </td>
<td width="148" height="30" class="texttitle">选择单位：</td>
<td width="150"><select name="WND_USER_UNITID" class="newSelect" onChange="changeclass(document.form1.WND_USER_UNITID.options[document.form1.WND_USER_UNITID.selectedIndex].value)">
<option value="" selected>-----请选择单位-----</option>
<%
sql="select * from WNT_UNIT where left(UNIT_BM,"&unitLeftSameStep&")='"&session("UNIT_BM")&"' and Len(UNIT_BM)="&unitAllTempStep&" order by UNIT_BM asc"
rs.open sql,conn,1,1
do while not rs.eof
%>
<option value="<%=trim(rs("WND_UNIT_ID"))%>"><%=Left(rs("WND_UNIT_UN"),10)%></option>
<%
rs.movenext
loop
rs.close
%>
</select></td>
<td width="160" rowspan="2" align="center" valign="middle" class="texttitle"><input type="image" name="submit" src="IMAGES/search.jpg"></td>
</tr>
<tr align="center" valign="bottom">
<td height="30" class="texttitle">选择用户：</td>
<td><select name="WND_USER_UNITNAME" class="newSelect">
<option selected value="">-----请选择用户-----</option>
</select></td>
</tr>
</form>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#fdfaf4" class="FPtalbe">
<%
dim username
if userid<>0 then
sql="select * from WNT_USER where WND_USER_ID="&userid
rs.open sql,conn,1,1
username=rs("WND_USER_USERNAME")
userType=rs("WND_USER_TYPE")
%>
<tr valign="bottom" class="texttitle">
<td height="30" align="center" class="greentext">当前用户： <%=rs("WND_USER_USERNAME")%> </td>
<td align="center" class="greentext">
<%
sql="select * from WNT_UNIT where WND_UNIT_ID in (select WND_USER_UNITID from WNT_USER where WND_USER_ID="&userid&")"
rssub.open sql,conn,1,1
if not rs.eof then
userUnitName=rssub("WND_UNIT_UN")
userUnitJibie=rssub("UNIT_Jibie")
userUnitBm=rssub("UNIT_BM")
end if
rssub.close
%>
单位：<%=userUnitName%></td>
<td align="center" class="greentext">授权人ID：<%=rs("WND_USER_WHO")%></td>
<td align="center">
<input name="Submit" type="submit" class="newSubmit" value="提交分配" onClick="formUjInfo.submit();">
</td>
</tr>
<%
rs.close
end if
%>
</table>
<%if userid<>"" then%>
<table width="760" border="0" cellpadding="0" cellspacing="0" bgcolor="#fdfaf4" class="textmost">
<%
sql="select * from WNT_UJ where WND_UJ_UserType="&userType&" and WND_UJ_TYPE<="&userUnitJibie&" and WND_UJ_XXJB>="&userUnitJibie&" and left(WND_UJ_HYBM,"&session("UNIT_Jibie")*session("EveryStepNumber")&")='"&session("UNIT_BM")&"' order by WND_UJ_Order asc"
rs.open sql,conn,1,1
newi=0
'查找最大ID值
sql="select max(WND_ID) as maxID from WNT_UJ"
rssub.open sql,conn,1,1
recnum = rssub("maxID")
rssub.close
%>
<form name="formUjInfo" method="post" action="WNP_AM_SAVE.ASP?userId=<%=userid%>&endNum=<%=recnum%>&thepage=WNP_AM_EDIT_GLY.ASP">
<tr align="right"><td height="30" colspan="2"> </td>
<td width="255"> </td>
<td width="120" align="center"></td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td width="150" height="20"> </td>
<td colspan="3"><%
kgsl=rs("WND_UJ_Step")
for i=1 to kgsl
response.Write " "
next
if rs("WND_UJ_Step")<>1 then
response.Write "<img src='IMAGES/tree_line1.gif'>"
end if
response.Write rs("WND_UJ_UJ")&"........................................."
sql="select * from WNT_AM where WND_AM_USERID="&userid&" and WND_AM_UJNUMBER="&rs("WND_ID")
rssub.open sql,conn,1,1
if not rssub.eof then
%>
<input name="<%=rs("WND_ID")%>" type="checkbox" id="chx<%=newi%>" value="<%=rs("WND_UJ_Step")%>" onClick="javascript:checkChooseAm(<%=newi%>);" checked>
<%
else
%>
<input name="<%=rs("WND_ID")%>" type="checkbox" id="chx<%=newi%>" value="<%=rs("WND_UJ_Step")%>" onClick="javascript:checkChooseAm(<%=newi%>);">
<%
end if
%>
<%
rssub.close
%>
</td>
</tr>
<%
rs.movenext
newi=newi+1
loop
rs.close
%>
</form>
<tr>
<td height="30" colspan="4"> </td>
</tr>
</table>
<%
end if
%>
</td>
</tr>
</table>
</body>
</html>
<%
call closedb
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -