如何给普通管理员生成网站首页权限_动易Cms教程

如何给普通治理员生成网站首页权限？

官方论坛的网友给出了许多修改方法，主要是通过修改Admin目录下的Admin_Index_Left.asp文件，来给予不用类型的治理员生成首页的权限。

信天游客服给出的修改方法是直接给普通治理员生成权限：
在Admin_Index_Left.asp找到
If AdminPurview = 1 And FileExt_SiteIndex < 4 Then
修改为
If AdminPurview = 1 or 2 And FileExt_SiteIndex < 4 Then

zhaoqb给出的方法更灵活点，根据你首页板块的需要，让相关负责首页板块更新的治理员（赋予不同角色）有生成的权限，但其他非负责首页板块内容更新的治理员就没有生成权限。
在Admin_Index_Left.asp找到网站生成治理：如下代码
If (AdminPurview = 1 And (FileExt_SiteIndex < 4 Or FileExt_SiteSpecial < 4)) Or strActionLink <> "" Or CheckPurview_Other(AdminPurview_Others, "Announce")=True Or CheckPurview_Other(AdminPurview_Others, "Menu_News") = True Then
Response.Write "<table cellpadding=0 cellspacing=0 align=center>" & vbCrLf
Response.Write " <tr>" & vbCrLf
Response.Write " <td class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background='Images/Admin_left_9.gif' id=menuTitle301 onclick=""new Element.toggle('submenu301')"" style='cursor:hand;'><a href='Admin_Help_Create.asp' target='main'><span class=glow>网站生成治理</span></a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
Response.Write " <tr>" & vbCrLf
Response.Write " <td style='display:none' align='right' id='submenu301'><div class=sec_menu style='width:165'>" & vbCrLf
Response.Write " <table cellpadding=0 cellspacing=0 align=center & vbCrLf
If (AdminPurview = 1 And FileExt_SiteIndex < 4) Or CheckPurview_Other(AdminPurview_Others, "Announce")=True Or CheckPurview_Other(AdminPurview_Others, "Menu_News") = True Then

'标记红色的为具有该权限的治理员给予网站首页生成权限，这里给出有公告和新闻菜单治理权限的治理员给予生成网站首页生成权限，其它的可以自己加，用 or 连接

Response.Write " <tr & vbCrLf
Response.Write " <td><a href='Admin_CreateIndex.asp' target='main'>生成网站首页</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
End If
。。。。。。。。。。

原贴地址：http://bbs.powereasy.net/dispbbs.asp?boardID=67&ID=325230&page=1

查看更多 动易Cms教程  动易Cms模板