📄 browserole.asp
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>资源管理系统</title>
</head>
<script language="JavaScript">
function delRole(roleID)
{
if(confirm("真的要删除吗?"))
window.location="delRole.asp?roleID="+roleID;
}
</script>
<body>
<p><font color="#FF9900"><strong>>> 角色</strong></font><font color="#FF9900"><strong>管理
---〉<a href="addRole0.asp">添加角色</a></strong></font></p>
<table width="100%" border="1" cellspacing="0" bordercolor="#FFAC75">
<tr bgcolor="#99CCFF">
<td width="30%" height="32"> <div align="center"><strong><font color="#006600">角色名称</font></strong></div></td>
<td width="30%"><strong><font color="#006600">权限</font></strong></td>
<td width="20%"><div align="center"><strong><font color="#006600">编辑</font></strong></div></td>
<td width="20%"><div align="center"><strong><font color="#006600">删除</font></strong></div></td>
</tr>
<%
set conn = server.CreateObject("adodb.connection")
conn.open"DBSource","sa",""
dim roleID,roleName
set rs = conn.execute("select *from TRole")
do until rs.eof
roleID=rs("role_id")
roleName=rs("role_name")
%>
<tr bgcolor="#DDEEFF">
<td> <div align="center"><font color="#006600"><%=roleName%></font></div></td>
<td> <a href="browseRoleRight.asp?roleID=<%=roleID%>&roleName=<%=roleName%>"><img src="image/forword.gif" border="0" width="32" height="22"></a></td>
<td> <div align="center"><font color="#006600"><a href="editRole0.asp?roleID=<%=roleID%>"><img src="image/edit.gif" width="15" height="15" border="0"></a></font></div></td>
<td> <div align="center"><font color="#006600"><img src="image/delete.gif" width="20" height="20" border="0" onClick="delRole(<%=roleID%>)" style="cursor:hand"></font></div></td>
</tr>
<%
rs.movenext
loop
%>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -