editrolerightl0.asp

来自「这是我自己设计的一个资源管理系统」· ASP 代码 · 共 46 行

ASP
46
字号
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>资源管理系统</title>
</head>

<body>
 
<p> 
  <%
   dim roleID,roleName,menuName,rightValue,rightV,menuID,rmID
   rmID=request("rmID")
   roleName=request("roleName")
   menuName=request("menuName")
  rightValue=request("rightValue")
  rightV=array("无权限","只读","可写","可改","删除","管理者")
  %>
  编辑 <font color="#FF00FF"><%=roleName%></font>-<font color="#FF0000"><%=menuName%></font>的权限 </p>
<p> 
<form action="editRoleRight1.asp"  method="post">
  <p>
    <select name="rightValue">
      <% for i = 0 to 5
    if CInt(rightValue)=CInt(i) then
%>
      <option value="<%=i%>" selected><%=rightV(i)%></option>
      <%
         else
%>
      <option value="<%=i%>" ><%=rightV(i)%></option>
      <%  end if
  next
%>
      
    </select>
  </p>
  <p></p> 
 <input type="hidden" name="rmID" value="<%=rmID%>">

    <input type="submit" name="Submit" value="提交">
  </p>
  <p>&nbsp;</p>
</form>
</body>
</html>

⌨️ 快捷键说明

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