⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 addroleright1.asp

📁 这是我自己设计的一个资源管理系统
💻 ASP
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>资源管理系统</title>
</head>
<script language=vbs>
'parent.top.location.reload'
parent.left.location.reload
</script>

<body>
<p><font color="#FF9900"><strong>&gt;&gt; 信息提示</strong></font> 
  <%
set conn=server.CreateObject("adodb.connection")
conn.open"DBSource","sa",""
dim menuID,roleID,roleName,rightValue,sql
menuID=request.Form("menuID")
roleID=request.Form("roleID")
roleName=request.Form("roleName")
rightValue=request.Form("rightValue")

sql="insert into TRoleRight(role_id,menu_id,rm_value) values('"&roleID&"','"&menuID&"','"&rightValue&"')"
conn.execute(sql)


%>
</p>
<table width="75%" border="1" cellspacing="0" bordercolor="#FFAC75">
  <tr>
    <td><div align="center">
        <p>&nbsp;</p>
        <p><font color="#006600">操作成功!请返回模块管理!</font></p>
        <p><font color="#006600"><a href="browseRoleRight.asp?roleID=<%=roleID%>&roleName=<%=roleName%>">返回</a></font></p>
        <p>&nbsp;</p>
      </div></td>
  </tr>
</table>
<p>&nbsp; </p>
</body>
</html>

⌨️ 快捷键说明

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