📄 setmenu.asp

📁 1 除掉了时间限制 2 除掉了人数限制改为 500人原为5人 3 发现一点小缺陷增加人员的时候没有判断登陆名是否重复！自己写吧~~~：） 4 又是一点缺陷
💻 ASP
字号:
<!--#include file="../config.ini" -->
<%
	dim conn
	dim rs
	set conn=server.CreateObject("adodb.connection")
	conn.Open connstring	
if request("mod")="save" then
	set rs=conn.Execute("delete from mymenu where userid='"&session("loginid")&"'")
	if Request.Form("right")<>"" then
		menus=Split(Request.Form("right"),",")
		rs.Open "select * from mymenu",conn,2,3,1
			for k=0 to ubound(menus)
					rs.AddNew
					rs("userid")=session("loginid")
					rs("menuid")=trim(menus(k))
					rs("seq")=k
					rs.Update
			next
	end if
	'rs.Close 
	set rs=nothing
	conn.Close 
	set conn=nothing
%>
<script language=javascript>
	window.opener.location.reload();
	window.close();
</script>
<%
end if
%>
<script language="javascript">
 function adddata(){  
 	if  (form1.Left.value!=""){
		  	form1.Right.options.add(new Option(form1.Left.options(parseInt(form1.Left.selectedIndex)).text,form1.Left.value)  );
		    form1.Left.options.remove(form1.Left.selectedIndex);
			//form1.arr.value=i;
	}
}
	  
 function deldata(){  
	if  (form1.Right.value!=""){
	  	form1.Left.options.add(new Option(form1.Right.options(parseInt(form1.Right.selectedIndex)).text,form1.Right.value));
		form1.Right.options.remove(form1.Right.selectedIndex);
	}
}

function moveupdata()
{
	if  (form1.Right.value!="")
	{
	var i=parseInt(form1.Right.selectedIndex);
		if (i!=0){
			rdvalue=form1.Right.options(parseInt(i-1)).value;
			rdtext=form1.Right.options(parseInt(i-1)).text;
			form1.Right.options(parseInt(i-1)).value=form1.Right.options(parseInt(i)).value;
			form1.Right.options(parseInt(i-1)).text=form1.Right.options(parseInt(i)).text;
			form1.Right.options(parseInt(i)).value=rdvalue;
			form1.Right.options(parseInt(i)).text=rdtext;
			form1.Right.options(parseInt(i-1)).selected=true;
		}
	}
}	

function movedowndata()
{
	if  (form1.Right.value!="")
	{
	var i=parseInt(form1.Right.selectedIndex);
		if (i!=(parseInt(form1.Right.length)-1)){
			rdvalue=form1.Right.options(parseInt(i+1)).value;
			rdtext=form1.Right.options(parseInt(i+1)).text;
			form1.Right.options(parseInt(i+1)).value=form1.Right.options(parseInt(i)).value;
			form1.Right.options(parseInt(i+1)).text=form1.Right.options(parseInt(i)).text;
			form1.Right.options(parseInt(i)).value=rdvalue;
			form1.Right.options(parseInt(i)).text=rdtext;
			form1.Right.options(parseInt(i)).selected=false;
			form1.Right.options(parseInt(i+1)).selected=true;
		}
	}
}

function save(){
	for(var i=0;i<=form1.Right.length-1;i++){
		form1.Right.options(i).selected=true;
	}
	form1.mod.value="save";
	form1.submit();
}
</script>
<html>
<head>
<title>设置快捷菜单</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../global.css" rel=STYLESHEET type=text/css>
</head>
<body bgcolor="efefef" link="#48576C" vlink="#48576C" alink="#000000">
<form action="" name="form1" method="Post">
<table width="100%" height="30" border="0" cellpadding="0" cellspacing="0">
    <tr> 
      <td height="25"><strong><font class=title>快捷菜单设置</font></strong>
      &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
      <a onclick="javascript:save();"><img src="../images/button_save.gif"></a>&nbsp;&nbsp;
	  <a onClick="window.close();"><img src="../images/button_cancel.gif"></a>
       </td>
    </tr>
    <tr > 
      <td height="16" colspan="3" background="../images/title.gif">&nbsp;</td>
    </tr>
    <tr>
      <td height=4></td>
    </tr>
  </table>
	        <table border="0" cellpadding="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#ffffff" width="100%" id="AutoNumber1" height="281">
            <tr> 
              
      <td width="80%" valign="top" bgcolor="efefef"> <table bgcolor="efefef" width="100%">
          <tr> 
            <td><div align="center">未选择菜单</div></td>
            <td><div align="center"></div></td>
            <td><div align="center"></div></td>
            <td><div align="center"></div></td>
            <td><div align="center">已选择菜单</div></td>
            <td>&nbsp;</td>
          </tr>
          <tr> 
            <td> <div align="center"> 
                <select name=Left size="20" style="width:120pt" ondblclick="adddata()">
                  <%
                    set rs=conn.Execute("select * from StandardMenu where menuid not in(select menuid from mymenu where userid='"&session("loginid")&"')")
					i=1
					do while not rs.EOF
					%>
                  <option value="<%=rs("menuid")%>"><%=rs("menuname")%></option>
                  <%
					rs.MoveNext
					i=i+1
					loop
					rs.Close
					%>
                </select>
              </div></td>
            <td>&nbsp; </td>
            <td bgcolor="efefef"> <p align="center"> 
                <input type="button" name="add" value=">>"  onClick="adddata()">
              </p>
              <p align="center"> 
                <input type="button" name="add" value="<<"  onClick="deldata()">
              </p></td>
            <td>&nbsp; </td>
            <td bgcolor="efefef"> <div align="center"> 
                <select name=Right size=20 multiple style="width:120pt" ondblclick="deldata()">
                  <%
                    set rs=conn.Execute("select * from v_MyMenu where userid='"&session("loginid")&"' order by seq")
					do while not rs.EOF
					%>
                  <option value="<%=rs("menuid")%>"><%=rs("menuname")%></option>
                  <%
					rs.MoveNext
					i=i+1
					loop
					rs.Close 
					set rs=nothing
					conn.Close 
					set conn=nothing
					%>
					%>
                  
                </select>
              </div></td>
            <td> <input type="button" name="moveup" value="上移"  onClick="moveupdata()"> 
              <br> <br> <input type="button" name="movedown" value="下移"  onClick="movedowndata()"></td>
          </tr>
        </table>
        <input type=hidden name="attendant">
                <input type=hidden name="arr" value=0>
                <input type=hidden name="mod">
      </td>
            </tr>
          </table>
</form>
</body>
</html>
⌨️ 快捷键说明

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