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

📄 admin_role.asp

📁 新闻发布系统
💻 ASP
📖 第 1 页 / 共 3 页
字号:
                <tr bgcolor="#FFF3E8"> 
                  <td width="32%" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="member" <%if CheckPurview(rs("popedom"),"member")=True then response.write "checked"%>> 
                    <font color="#FF0000">会员管理</font></td>
                  <td width="68%" class="td2"> <input name="popedom" type="checkbox" id="popedom" value="ad" <%if CheckPurview(rs("popedom"),"ad")=True then response.write "checked"%>> 
                    <font color="#FF0000"> 广告管理</font></td>
                </tr>
                <tr bgcolor="#FFF3E8"> 
                  <td width="32%" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="vote" <%if CheckPurview(rs("popedom"),"vote")=True then response.write "checked"%>> 
                    <font color="#FF0000">投票管理&nbsp;</font></td>
                  <td width="68%" class="td2"><input name="popedom" type="checkbox" Disabled id="popedom" value="forum" <%if CheckPurview(rs("popedom"),"forum")=True then response.write "checked"%>> 
                    <font color="#FF0000">论坛管理</font> </td>
                </tr>
                <tr bgcolor="#FFF3E8"> 
                  <td class="td1"> <input name="popedom" Disabled type="checkbox" id="popedom" value="it" <%if CheckPurview(rs("popedom"),"it")=True then response.write "checked"%>> 
                    <font color="#FF0000">报价系统管理</font></td>
                  <td class="td2"> <input name="popedom" type="checkbox" id="popedom" value="tongji" <%if CheckPurview(rs("popedom"),"tongji")=True then response.write "checked"%>> 
                    <font color="#FF0000"> 网站统计管理</font></td>
                </tr>
                <tr bgcolor="#FFF3E8"> 
                  <td class="td1"> <input name="popedom" type="checkbox" id="popedom" value="system" <%if CheckPurview(rs("popedom"),"system")=True then response.write "checked"%>> 
                    <font color="#FF0000">系统管理</font></td>
                  <td class="td2"> <input name="popedom" type="checkbox" id="popedom" value="data" <%if CheckPurview(rs("popedom"),"data")=True then response.write "checked"%>> 
                    <font color="#FF0000">数据库管理</font></td>
                </tr>
                <tr bgcolor="#FFF3E8"> 
                  <td class="td1"> <input name="popedom" type="checkbox" id="popedom" value="xuni" <%if CheckPurview(rs("popedom"),"xuni")=True then response.write "checked"%>>
                    虚拟目录管理 </td>
                  <td class="td2"> <input name="popedom" type="checkbox" id="popedom" value="config" <%if CheckPurview(rs("popedom"),"config")=True then response.write "checked"%>>
                    系统安全</td>
                </tr>
                <tr bgcolor="#FFF3E8"> 
                  <td class="td1"><input name="popedom" type="checkbox" id="popedom" value="setup" <%if CheckPurview(rs("popedom"),"setup")=True then response.write "checked"%>>
                    参数设置</td>
                  <td class="td2"><input name="popedom" type="checkbox" id="popedom" value="back" <%if CheckPurview(rs("popedom"),"back")=True then response.write "checked"%>>
                    数据备份</td>
                </tr>
                <tr bgcolor="#FFF3E8"> 
                  <td class="td1"><input name="popedom" type="checkbox" id="popedom" value="log" <%if CheckPurview(rs("popedom"),"log")=True then response.write "checked"%>>
                    日志管理</td>
                  <td class="td2"><input name="popedom" type="checkbox" id="popedom" value="sql1" <%if CheckPurview(rs("popedom"),"sql1")=True then response.write "checked"%>>
                    执行SQL语句</td>
                </tr>
                <tr bgcolor="#FFF3E8"> 
                  <td class="td1"><input name="popedom" type="checkbox" id="popedom" value="users" <%if CheckPurview(rs("popedom"),"users")=True then response.write "checked"%>>
                    会员 /管理员管理</td>
                  <td class="td2"><input name="popedom" type="checkbox" id="popedom" value="role1" <%if CheckPurview(rs("popedom"),"role1")=True then response.write "checked"%>>
                    角色管理 </td>
                </tr>
                <tr bgcolor="#FFF3E8"> 
                  <td class="td1"><input name="popedom" type="checkbox" id="popedom" value="update" <%if CheckPurview(rs("popedom"),"update")=True then response.write "checked"%>>
                    在线升级</td>
                  <td class="td2"><input name="popedom" type="checkbox" id="popedom" value="pass" <%if CheckPurview(rs("popedom"),"pass")=True then response.write "checked"%>>
                    是否允许修改密码</td>
                </tr>
                <tr bgcolor="#FFF3E8">
                  <td class="td1"><input name="popedom" type="checkbox" id="popedom" value="Reviewb" <%if CheckPurview(rs("popedom"),"Reviewb")=True then response.write "checked"%>>
                    查看数据库统计</td>
                  <td class="td2">&nbsp;</td>
                </tr>
              </table></td>
          </tr>
        </table></td>
    </tr>
    <tr bgcolor="#F7FFF4"> 
      <td valign="top" bgcolor="#F7FFF4" class="BarTitle"><div align="right">设置新闻录入权限:</div></td>
      <td>
        <% set rs1 = server.createobject("adodb.recordset")
        sql1 = "select * from newsclass order by RootID asc,orders asc"
        rs1.open sql1,conn,1,1
        if rs1.recordcount=0 then
        response.write("<font color=red>还没有新闻栏目</font>→<font color=blue><a href=admin_ClassManage.asp>添加栏目</a></font>")
        end if
        while not rs1.eof
           if rs1("ParentID")=0 then
              response.write("<hr size=1 noshade color=#97C893>")
           end if
           for i=1 to rs1("depth")
              Response.Write "&nbsp;<font color=""#97C893"">│</font>"
           next
           if rs1("Child")<>0 then
		      Response.Write "&nbsp;<font color=""#97C893"">├</font> "
			  response.write("<input name=""popedom"" type=""checkbox"" id=""popedom"" value="""&rs1("Classen")&"""")
			  if CheckPurview(rs("popedom"),""&rs1("classen")&"")=True then 
			  response.write (" checked>")
			  else
			  response.Write(">")
			  end if
			  response.write("<img src=pic/NewsPr.gif>")
        	  response.write(rs1("classcn"))
    		  response.write("<br>")
		   else
		   response.write("&nbsp;<font color=""#97C893"">├&nbsp;</font>")
		   response.write("<input name=""popedom"" type=""checkbox"" id=""popedom"" value="""&rs1("classen")&"""")
		      if CheckPurview(rs("popedom"),""&rs1("classen")&"")=True then
		      response.write (" checked>")
              else
              response.Write(">")
              end if
		   response.write("<img src=pic/NewsPr1.gif>"&rs1("classcn")&"<br>")
		   end if
      rs1.movenext
    wend
rs1.close
 %>
      </td>
    </tr>
    <tr bgcolor="#F7FFF4"> 
      <td align="right" bgcolor="#F7FFF4"> <div align="right"> 
          <script>
function checkMdyReco(obj){
    if(obj.Title.value==""){
        alert("请输入[标题]");
        obj.Title.focus();
        return false;
    }
    if(obj.Content.value==""){
        alert("请输入[简介]");
        obj.Content.focus();
        return false;
    }
    return true;
}
</script>
        </div></td>
      <td> <input name="Submit" type="submit" class=Anbutc  value="确  定"> <input name="Submit2" type="reset" class=Anbutc value="还  原"> 
        <input name="Submit3" type="button" class=Anbutc value="返  回" onclick="window.history.back();">
        说明:红色为父级权限,只有父级权限允许才能操作相应的子类权限 </td>
    </tr>
    <tr bgcolor="#F7FFF4"> 
      <td colspan="2" align="right"> <script>
function DelReco(id){
    if(confirm("你确定删除吗?")){
        window.location="?Work=DelReco&title="+id;
    }
}
</script> <input name="Submit5" type="button" class="button01-out" onclick="DelReco('<%=title%>')" value="删 除" > 
      </td>
    </tr>
  </table>
</form>

<%
    Rs.Close
    Set Rs=Nothing

End Sub%>
<%Sub AddReco()%>
<form name="form2" method="post" action="?Work=SaveAddReco" onSubmit="return checkAddReco(this)">
  <table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#7ED3A7" class="ContentTabBg">
    <tr bgcolor="#F7FFF4"> 
      <td colspan="2" align="center" class="BarTitleBg"> <table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/bg1.gif">
          <tr> 
            <td height="26"> <div align="center"><strong>创 建 角 色<b><strong> </strong></b></strong>&nbsp;<a href="Admin_role.asp?work=AddReco"><font color="#FF0000">添加新角色</font></a> 
                <font color="#FF0000">| <a href="Admin_role.asp"><font color="#FF0001">角色管理首页</font></a></font><a href="Admin_role.asp">&nbsp;</a></div></td>
          </tr>
        </table></td>
    </tr>
    <tr bgcolor="#F7FFF4"> 
      <td width="16%" class="BarTitle">角色标题:</td>
      <td width="84%"> <input name="Title" type="text" class="Input" id="Title2" size="40" ></td>
    </tr>
    <tr bgcolor="#F7FFF4"> 
      <td width="16%" class="BarTitle">角色简介:</td>
      <td width="84%"> <textarea name="Content" cols="45" class="Input" id="Content3"></textarea></td>
    </tr>
    <tr bgcolor="#F7FFF4"> 
      <td valign="top" class="BarTitle">角色权限:<br>
        <strong>网站管理权限</strong></td>
      <td width="84%"> <table width="100%" border="0" cellspacing="0" cellpadding="5">
          <tr> 
            <td width="49%" class="td0"> <table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#7ED3A7">
                <tr> 
                  <td width="32%" bgcolor="#EFFFE8" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="add">
                    信息添加/管理</td>
                  <td width="68%" bgcolor="#EFFFE8" class="td2"> <input name="popedom" type="checkbox" id="popedom" value="class">
                    栏目管理</td>
                </tr>
                <tr> 
                  <td bgcolor="#EFFFE8" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="check">
                    新闻审核</td>
                  <td bgcolor="#EFFFE8" class="td2"> <input name="popedom" type="checkbox" id="popedom" value="review">
                    评论管理</td>
                </tr>
                <tr> 
                  <td bgcolor="#EFFFE8" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="special">
                    专题管理</td>
                  <td bgcolor="#EFFFE8" class="td2">&nbsp; </td>
                </tr>
                <tr> 
                  <td bgcolor="#EFFFE8" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="caiji"> 
                    <font color="#FF0000">信息采集</font></td>
                  <td bgcolor="#EFFFE8" class="td2"> <input name="popedom" type="checkbox" id="popedom" value="templet">
                    类别 模板管理/ 
                    <input name="popedom" type="checkbox" id="popedom" value="templeti">
                    首页模板/ 专题模板/ 
                    <input name="popedomp" type="checkbox" id="popedomp" value="templetp">
                    图片模板/ 
                    <input name="popedom" type="checkbox" id="popedom" value="templetto">
                    摸班捆绑</td>
                </tr>
                <tr> 
                  <td bgcolor="#EFFFE8" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="pic"> 
                    <font color="#FF0000">图片管理</font></td>
                  <td bgcolor="#EFFFE8" class="td2"> <input name="popedom" Disabled type="checkbox" id="popedom" value="block"> 
                    <font color="#FF0000">块操作</font></td>
                </tr>
                <tr> 
                  <td bgcolor="#EFFFE8" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="site"> 
                    <font color="#FF0000">站点管理</font></td>
                  <td bgcolor="#EFFFE8" class="td2"> <input name="popedom" type="checkbox" id="popedom" value="makeclass">
                    生成所有分类(信息/图片/专题) </td>
                </tr>
                <tr> 
                  <td bgcolor="#EFFFE8" class="td1"> <input name="popedom" type="checkbox" id="popedom" value="makehtml">
                    生成所有新闻(信息/图片/并排) </td>
                  <td bgcolor="#EFFFE8" class="td2"><input name="popedom" type="checkbox" id="popedom" value="makeindex">
                    生成首页(信息/图片/专题/下载) </td>
                </tr>
                <tr bgcolor="#EFFFE8"> 
                  <td class="td1"><input name="popedom" type="checkbox" id="popedom" value="makedh">
                    生成导航(信息/图片) </td>
                  <td class="td2"><input name="popedom" type="checkbox" id="popedom" value="contribute"> 
                    <font color="#FF0000">投稿管理</font></td>
                </tr>
                <tr bgcolor="#EFFFE8"> 
                  <td class="td1"><input name="popedom" type="checkbox" id="popedom" value="changgui"> 
                    <font color="#FF0000">常规管理 </font></td>
                  <td class="td2"><input name="popedom" type="checkbox" id="popedom" value="js"> 

⌨️ 快捷键说明

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