%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
option explicit
response.buffer=true
Const PurviewLevel=0 '操作权限
Const CheckChannelID=0 '所属频道,0为不检测所属频道
%>
<%
dim ChannelID,rs,sql
dim FoundErr,ErrMsg
dim AdminPurview_Channel
ChannelID=trim(request("ChannelID"))
if ChannelID="" then
ChannelID=0
else
ChannelID=Clng(ChannelID)
end if
%>
文章频道
<%
if AdminPurview_Article=1 then response.write "(频道管理员)"
if AdminPurview_Article=2 then response.write "(栏目总编)"
if AdminPurview_Article=3 then response.write "(栏目管理员)"
if AdminPurview_Article=4 then response.write "(无权限)"
%>
|
下载频道
<%
if AdminPurview_Soft=1 then response.write "(频道管理员)"
if AdminPurview_Soft=2 then response.write "(栏目总编)"
if AdminPurview_Soft=3 then response.write "(栏目管理员)"
if AdminPurview_Soft=4 then response.write "(无权限)"
%>
|
可以添加、管理栏目和专题 |
<%if AdminPurview_Article=1 then
response.write "√"
else
response.write "×"
end if
%>
|
可以添加、管理栏目 |
<%if AdminPurview_Soft=1 then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理文章评论及文章回收站 |
<%if AdminPurview_Article=1 then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理软件评论 |
<%if AdminPurview_Soft=1 then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理专题文章 |
<%if AdminPurview_Article<=2 then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理软件回收站 |
<%if AdminPurview_Soft=1 then
response.write "√"
else
response.write "×"
end if
%>
|
各栏目文章录入、审核、管理权限 |
<%if AdminPurview_Article<=2 then
response.write "全部权限"
elseif AdminPurview_Article=3 then
response.write "部分权限"
else
response.write "无权限"
end if
%>
|
各栏目软件录入、审核、管理权限 |
<%if AdminPurview_Soft<=2 then
response.write "全部权限"
elseif AdminPurview_Soft=3 then
response.write "部分权限"
else
response.write "无权限"
end if
%>
|
图片频道
<%
if AdminPurview_Photo=1 then response.write "(频道管理员)"
if AdminPurview_Photo=2 then response.write "(栏目总编)"
if AdminPurview_Photo=3 then response.write "(栏目管理员)"
if AdminPurview_Photo=4 then response.write "(无权限)"
%>
|
留言频道 |
可以添加、管理栏目 |
<%if AdminPurview_Photo=1 then
response.write "√"
else
response.write "×"
end if
%>
|
回复留言 |
<%if CheckPurview(AdminPurview_Guest,"Reply")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理软件评论 |
<%if AdminPurview_Photo=1 then
response.write "√"
else
response.write "×"
end if
%>
|
修改留言 |
<%if CheckPurview(AdminPurview_Guest,"Modify")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理软件回收站 |
<%if AdminPurview_Photo=1 then
response.write "√"
else
response.write "×"
end if
%>
|
删除留言 |
<%if CheckPurview(AdminPurview_Guest,"Del")=True then
response.write "√"
else
response.write "×"
end if
%>
|
各栏目图片录入、审核、管理权限 |
<%if AdminPurview_Photo<=2 then
response.write "全部权限"
elseif AdminPurview_Photo=3 then
response.write "部分权限"
else
response.write "无权限"
end if
%>
|
审核留言 |
<%if CheckPurview(AdminPurview_Guest,"Check")=True then
response.write "√"
else
response.write "×"
end if
%>
|
网站管理权限 |
可以修改自己的登录密码 |
<%if CheckPurview(AdminPurview_Others,"ModifyPwd")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以修改网站信息配置
|
<%if AdminPurview=1 then
response.write "√"
else
response.write "×"
end if
%>
|
可以进行频道管理 |
<%if CheckPurview(AdminPurview_Others,"Channel")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理网站广告 |
<%if CheckPurview(AdminPurview_Others,"AD")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理网站公告 |
<%if CheckPurview(AdminPurview_Others,"Announce")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理友情链接 |
<%if CheckPurview(AdminPurview_Others,"FriendSite")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理网站调查 |
<%if CheckPurview(AdminPurview_Others,"Vote")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理网站统计 |
<%if CheckPurview(AdminPurview_Others,"Counter")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理注册用户 |
<%if CheckPurview(AdminPurview_Others,"User")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理邮件列表 |
<%if CheckPurview(AdminPurview_Others,"MailList")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理配色模板 |
<%if CheckPurview(AdminPurview_Others,"Skin")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理版面设计模板 |
<%if CheckPurview(AdminPurview_Others,"Layout")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理JS代码 |
<%if CheckPurview(AdminPurview_Others,"JS")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理上传文件 |
<%if CheckPurview(AdminPurview_Others,"UpFile")=True then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理数据库 |
<%if AdminPurview=1 then
response.write "√"
else
response.write "×"
end if
%>
|
|
|
<%
end sub
Sub ShowChannelPurview()
dim AdminChannel_Name
select case ChannelID
case 2
AdminPurview_Channel=AdminPurview_Article
AdminChannel_Name="文章"
case 3
AdminPurview_Channel=AdminPurview_Soft
AdminChannel_Name="软件"
case 4
AdminPurview_Channel=AdminPurview_Photo
AdminChannel_Name="图片"
end select
%>
<%=AdminChannel_Name%>频道
<%
if AdminPurview_Channel=1 then response.write "(频道管理员)"
if AdminPurview_Channel=2 then response.write "(栏目总编)"
if AdminPurview_Channel=3 then response.write "(栏目管理员)"
if AdminPurview_Channel=4 then response.write "(无权限)"
%>
|
可以添加、管理栏目 |
<%if AdminPurview_Channel=1 then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理<%=AdminChannel_Name%>评论 |
<%if AdminPurview_Channel=1 then
response.write "√"
else
response.write "×"
end if
%>
|
可以管理<%=AdminChannel_Name%>回收站 |
<%if AdminPurview_Channel=1 then
response.write "√"
else
response.write "×"
end if
%>
|
<%if ChannelID=2 then%>
可以管理专题文章 |
<%if AdminPurview_Channel<=2 then
response.write "√"
else
response.write "×"
end if
%>
|
<%end if%>
各栏目<%=AdminChannel_Name%>录入、审核、管理权限 |
<%if AdminPurview_Channel<=2 then
response.write "全部权限"
elseif AdminPurview_Channel=3 then
response.write "部分权限"
else
response.write "无权限"
end if
%>
|