📄 user_selectgroup.asp

📁 淘客网上商店网站程序淘客网上商店网站程序淘客网上商店网站程序
💻 ASP
字号:
<!--#include file="../Conn.asp"-->
<!--#include file="../inc/Cl_ClsSysTem.asp"-->
<!--#include file="../inc/Cl_Function_Public.asp"-->
<!--#include file="../inc/Cl_FileIcon.asp"-->
<!--#include file="Inc/Function.asp"-->
<%
Cl.Get_WebSetting()
Dim sLevel
sLevel=Trim(Request("Level"))
if sLevel="" then sLevel=5
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>用户级选择</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="../Skins/Css/Admin.Css" rel="stylesheet" type="text/css" />
<base target="_self" />
<script language="JavaScript" type="text/javascript">
<!--
function getGroupID()
{
	var Val=""
	var ValV=""
	for (var i=0;i<document.myform.UserGroup.length;i++){
		if (document.myform.UserGroup.options[i].selected){
		Val += document.myform.UserGroup.options[i].value;
		ValV += document.myform.UserGroup.options[i].text;
		Val += ",";
		ValV += ",";
		}
	}
	Val=Val.substr(0,Val.lastIndexOf(","));
	ValV=ValV.substr(0,ValV.lastIndexOf(","));
	window.returnValue=Val+'|'+ValV;
	window.close();
}
function ChkSelectAll(obj)
{
	if (obj.checked==true)
	{
		for(var i=0;i<document.myform.UserGroup.length;i++){
		document.myform.UserGroup.options[i].selected=true;}
	}
	else
	{
		for(var i=0;i<document.myform.UserGroup.length;i++){
		document.myform.UserGroup.options[i].selected=false;}
	}
}
function SelectAll(){
	for(var i=0;i<document.myform.UserGroup.length;i++){
	document.myform.UserGroup.options[i].selected=true;}
}
function UnSelectAll(){
	for(var i=0;i<document.myform.UserGroup.length;i++){
	document.myform.UserGroup.options[i].selected=false;}
}
//-->
</script>
</head>
<body>
<form method="post" name="myform" id="myform" action="">
<table border="0" align="center" cellpadding="0" cellspacing="0" class="border" style="width:100%;">
	<tr class="tdbg">
		<td>
		<select name="UserGroup" size="2" multiple="multiple" style="width:100%;height:260px;" ondblclick="getGroupID();">
		<%
		Dim Node
		For Each Node In Application(Cl.CacheName & "_usergrouplist").DocumentElement.selectNodes("usergroup[@id!=6 and @id!=7]")
			if InStr(","&sLevel&",",","&Trim(Node.SelectSingleNode("@id").text)&",")>0 then
				Response.write("<option value='" & Node.SelectSingleNode("@id").text & "' selected>" & Node.SelectSingleNode("@groupname").text & "</option>")
			else
				Response.write("<option value='" & Node.SelectSingleNode("@id").text & "'>" & Node.SelectSingleNode("@groupname").text & "</option>")
			end if
		Next
		Set Node = Nothing
		%>
		</select>
		</td>
	</tr>
	<tr class="tdbg">
		<td align="left">
			<input type="checkbox" value="0" onclick="ChkSelectAll(this);" /> 全选
			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
			<input name="submit" type="submit" id="submit" value="确定" onclick="getGroupID();" />&nbsp;&nbsp;
			<input name="cancel" type="button" id="cancel" value="取消" onclick="window.close()" />
		</td>
	</tr>
	<tr class="tdbg">
		<td style="text-align:left;color:#0000ff;">提示：按“Shift”“Ctrl”可多选</td>
	</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -