📄 index.asp
字号:
<%end if%>
<%Case 5%>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>浏览频道</font>','Disabled','KS.Shop.asp?ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>首页</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>添加<%=SQL(3,I)%></font>','AddInfo','KS.Shop.asp?Action=Add&ChannelID=<%=SQL(0,I)%>',<%=SQL(0,I)%>);">添加<%=SQL(3,I)%></a></li>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10010") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red><%=SQL(3,I)%>评论管理</font>','Disabled','KS.Comment.asp?ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>评论管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10005") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red><%=SQL(3,I)%>批量设置</font>','Disabled','KS.Shop.asp?ChannelID=<%=SQL(0,I)%>&Action=SetAttribute');">批量设置</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10001") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>栏目管理 >> <font color=red><%=SQL(3,I)%>栏目管理</font>','Disabled','KS.Class.asp?ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>栏目管理</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>栏目管理 >> <font color=red>添加<%=SQL(3,I)%>栏目</font>','Go','KS.Class.asp?ChannelID=<%=SQL(0,I)%>&Action=Add&FolderID=1',<%=SQL(0,I)%>);">添加</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10013") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>专题管理 >> <font color=red><%=SQL(3,I)%>专题管理</font>','Disabled','KS.Special.asp?ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>专题管理</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>专题管理 >> <font color=red>添加<%=SQL(3,I)%>专题</font>','Go','KS.Special.asp?ChannelID=<%=SQL(0,I)%>&Action=Add&FolderID=0',<%=SQL(0,I)%>);">添加</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10012") Then %>
=====================
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>处理24小时内订单</font>','Disabled','KS.ShopOrder.asp?searchtype=1&ChannelID=<%=SQL(0,I)%>');"><font color=red>处理24小时内订单</font></a></li>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>处理所有订单</font>','Disabled','KS.ShopOrder.asp?ChannelID=<%=SQL(0,I)%>');">处理所有订单</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10014") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>资金明细查询</font>','Disabled','KS.LogMoney.asp?ChannelID=<%=SQL(0,I)%>');">资金明细查询</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10015") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>发退货查询</font>','Disabled','KS.LogDeliver.asp?ChannelID=<%=SQL(0,I)%>');">发退货查询</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10016") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>发退货查询</font>','Disabled','KS.LogInvoice.asp?ChannelID=<%=SQL(0,I)%>');">开发票查询</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "20001") Then %>
=====================
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>关键字Tags管理</font>','Disabled','KS.KeyWord.asp?ChannelID=<%=SQL(0,I)%>');">关键字</a>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "20003") Then %>
<a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red><%=SQL(3,I)%>厂商管理</font>','Disabled','KS.Author.asp?ChannelID=<%=SQL(0,I)%>');">厂商管理</a> </li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "20004") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>送货方式管理</font>','Disabled','KS.Delivery.asp?ChannelID=<%=SQL(0,I)%>');">送货&付款方式</a></li>
<%end if%>
<%Case 6%>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>所有歌曲管理</font>','Disabled','KS.Music.asp?url=KS.MusicSong.asp');">歌曲管理</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>添加歌曲</font>','Disabled','KS.Music.asp?url=KS.MusicSong.asp?Action=Add&Classid=1',<%=SQL(0,I)%>);">添加歌曲</a></li>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>所有歌曲管理</font>','Disabled','KS.Music.asp?url=KS.MusicSpecial.asp');">专辑管理</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>添加歌曲</font>','Disabled','KS.Music.asp?url=KS.MusicSpecial.asp?Action=Step1',<%=SQL(0,I)%>);">添加专辑</a></li>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>分类管理</font>','Disabled','KS.Music.asp?url=KS.MusicType.asp');">分类管理</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>歌手管理</font>','Disabled','KS.Music.asp?url=KS.MusicSinger.asp',<%=SQL(0,I)%>);">歌手管理</a></li>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>审核歌词</font>','Disabled','KS.Music.asp?url=KS.MusicGeCi.asp');">审核歌词</a> <a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>专辑评论管理</font>','Disabled','KS.Music.asp?url=KS.MusicComment.asp');">专辑评论</a></li>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>歌曲服务器管理</font>','Disabled','KS.MediaServer.asp?TypeID=1');">歌曲服务器管理</a></li>
<%Case 7%>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>浏览频道</font>','Disabled','KS.Movie.asp?ChannelID=<%=SQL(0,I)%>',<%=SQL(0,I)%>);"><%=SQL(3,I)%>首页</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>添加<%=SQL(3,I)%></font>','AddInfo','KS.Movie.asp?Action=Add&ChannelID=<%=SQL(0,I)%>',<%=SQL(0,I)%>);">添加<%=SQL(3,I)%></a></li>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "100105") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red><%=SQL(3,I)%>评论管理</font>','Disabled','KS.Comment.asp?ChannelID=<%=SQL(0,I)%>');">评论管理</a>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10012") Then %>
<a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>签收<%=SQL(3,I)%></font>','Disabled','KS.MovieUser.asp?ChannelID=<%=SQL(0,I)%>');">签收<%=SQL(3,I)%></a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10005") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red><%=SQL(3,I)%>批量设置</font>','Disabled','KS.Movie.asp?ChannelID=<%=SQL(0,I)%>&Action=SetAttribute');">批量设置</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10001") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>栏目管理 >> <font color=red><%=SQL(3,I)%>栏目管理</font>','Disabled','KS.Class.asp?ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>栏目管理</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>栏目管理 >> <font color=red>添加<%=SQL(3,I)%>栏目</font>','Go','KS.Class.asp?ChannelID=<%=SQL(0,I)%>&Action=Add&FolderID=1',<%=SQL(0,I)%>);">添加</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "10013") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>专题管理 >> <font color=red><%=SQL(3,I)%>专题管理</font>','Disabled','KS.Special.asp?ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>专题管理</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>专题管理 >> <font color=red>添加<%=SQL(3,I)%>专题</font>','Go','KS.Special.asp?ChannelID=<%=SQL(0,I)%>&Action=Add&FolderID=0',<%=SQL(0,I)%>);">添加</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M720003") Then %>
=====================
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>参数设置</font>','SetParam','KS.MovieParam.asp?ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>参数设置</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M720002") Then %>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>服务器管理</font>','Disabled','KS.MediaServer.asp?TypeID=2&ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>服务器管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M720001") Then %>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>关键字Tags管理</font>','Disabled','KS.KeyWord.asp?ChannelID=<%=SQL(0,I)%>');">关键字Tags管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "20006") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>Digg管理</font>','Disabled','KS.DiggList.asp?ChannelID=<%=SQL(0,I)%>');">Digg管理</a>
<a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>Digg记录</font>','Disabled','KS.Digg.asp?ChannelID=<%=SQL(0,I)%>');">Digg记录</a>
</li>
<%end if%>
<%Case 8%>
<li><a href='KS.Supply.asp' target='MainFrame' onClick=""parent.parent.frames['BottomFrame'].location='KS.Split.asp?ButtonSymbol=Disabled&OpStr=供求管理 >> <font color=red>浏览大类</font>';"">供求管理首页</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>添加<%=SQL(3,I)%></font>','AddInfo','KS.SupplyAdd.asp?Action=Add',<%=SQL(0,I)%>);">添加</a></li>
<li><a href="KS.Supply.asp?Verific=0" target="MainFrame">审核供求信息</a></li>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>栏目管理 >> <font color=red><%=SQL(3,I)%>栏目管理</font>','Disabled','KS.Class.asp?ChannelID=<%=SQL(0,I)%>');"><%=SQL(3,I)%>栏目管理</a> <a href='#' onClick="SelectObjItem1(this,'<%=SQL(3,I)%>栏目管理 >> <font color=red>添加<%=SQL(3,I)%>栏目</font>','Go','KS.Class.asp?ChannelID=<%=SQL(0,I)%>&Action=Add&FolderID=1',<%=SQL(0,I)%>);">添加</a></li>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>信息留言管理</font>','Disabled','KS.Comment.asp?ChannelID=<%=SQL(0,I)%>');">信息留言管理</a></li>
<li><a href='KS.SupplyType.asp' target='MainFrame' onClick="parent.parent.frames['BottomFrame'].location='KS.Split.asp?ButtonSymbol=Disabled&OpStr=供求管理中心 >> <font color=red>供求交易类型管理</font>';">交易类型管理</a></li>
<li><a href="#" onClick="javascript:SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>关键字Tags管理</font>','Disabled','KS.KeyWord.asp?ChannelID=<%=SQL(0,I)%>');">关键字Tags管理</a></li>
<%If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "20006") Then %>
<li><a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>Digg管理</font>','Disabled','KS.DiggList.asp?ChannelID=<%=SQL(0,I)%>');">Digg管理</a>
<a href='#' onClick="SelectObjItem1(this,'<%=SQL(1,I)%> >> <font color=red>Digg记录</font>','Disabled','KS.Digg.asp?ChannelID=<%=SQL(0,I)%>');">Digg记录</a>
</li>
<%end if%>
<%case 9%>
<li><a href="mnkc/mnkc.asp" target="MainFrame">试卷管理/添加</a></li>
===================
<li><a href="mnkc/refreshindex.asp" target="MainFrame">发布频道首页</a></li>
<li><a href="mnkc/mnkc_makesortall.asp?type=all" target="MainFrame">发布所有分类
</a></li>
<li><a href="mnkc/mnkc_makemnkcall.asp" target="MainFrame">发布所有试卷页</a></li>
<%End Select%>
<%
If KS.ReturnPowerResult(SQL(0,I), "M" & SQL(0,I) & "20005") Then
if sql(0,i)<>9 then
if sql(0,i)=6 then%>
<li><a href="include/music/refreshmusichtml.asp" target="MainFrame">生成<%=SQL(3,I)%>HTML操作</a></li>
<%else%>
<li><a href="include/refreshhtml.asp?channelid=<%=sql(0,i)%>" target="MainFrame">生成<%=SQL(3,I)%>HTML操作</a></li>
<%
end if
end if
end if
%>
</div>
<%
n=n+1
End If
Next
%>
</ul>
<ul id="dleft_tab2" style="display:none;">
<div class="dt"><img height=7 src="images/35.gif" width=5 align="left" style="margin:3px 0 0 8px;">空 间 站 点</div>
<div class='dc'>
<%If KS.ReturnPowerResult(0, "KSMS10000") Then%>
<li><a href="#" onClick="SelectObjItem1(this,'个人空间 >> <font color=red>空间参数设置</font>','SetParam','KS.SpaceSetting.asp');" title="空间参数设置">空间参数设置</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS10001") Then%>
<li><a href="KS.Space.asp" target="MainFrame" title="空间站点管理">空间站点管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS10002") Then%>
<li><a href="KS.Spacelog.asp" target="MainFrame" title="空间日志管理">空间日志管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS10003") Then%>
<li><a href="KS.SpacePhotoxc.asp" target="MainFrame" title="用户相册管理">用户相册管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS10004") Then%>
<li><a href="KS.SpaceTeam.asp" target="MainFrame" title="用户圈子管理">用户圈子管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS10005") Then%>
<li><a href="KS.SpaceMessage.asp" target="MainFrame" title="用户留言管理">用户留言管理</a></li>
<%end if%>
</div>
<div class="dt"><img height=7 src="images/35.gif" width=5 align="left" style="margin:3px 0 0 8px;">企 业 空 间</div>
<div class="dc">
<li><a href="KS.EnterPrise.asp" target="MainFrame" title="企业信息管理">企业信息管理</a></li>
<li><a href="KS.EnterPriseNews.asp" target="MainFrame" title="企业信息管理">企业新闻管理</a></li>
</div>
<div class="dt"><img height=7 src="images/35.gif" width=5 align="left" style="margin:3px 0 0 8px;">其 它 系 统</div>
<div class="dc">
<%If KS.ReturnPowerResult(0, "KSMS20000") Then%>
<li><a href="KS.ExtChannel.asp" target="MainFrame" title="外部频道管理">外部频道管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS20001") Then%>
<li><a href="KS.FriendLink.asp" target="MainFrame" title="友情链接管理">友情链接管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS20002") Then%>
<li><a href="KS.Announce.asp" target="MainFrame" title="网站公告管理">网站公告管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS20003") Then%>
<li><a href="KS.Vote.asp" target="MainFrame" title="站内调查管理">站内调查管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS20004") Then%>
<li><a href="KS.GuestBook.asp?Action=Main" target="MainFrame" title="网站留言管理">网站留言管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS20005") Then%>
<li><a href="KS.Online.asp" target="MainFrame" title="站点计数器管理">站点计 数 器</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KSMS20006") Then%>
<li><a href="KS.Ads.asp" target="MainFrame" title="广告系统管理">广告系统管理</a></li>
<%end if%>
</div>
</ul>
<ul id="dleft_tab3" style="display:none;">
<div class="dt"><img height=7 src="images/35.gif" width=5 align="left" style="margin:3px 0 0 0px;">基本信息管理</div>
<div class="dc">
<%If KS.ReturnPowerResult(0, "KMST10001") Then%>
<li><a href="#" onClick="SelectObjItem1(this,'系统设置 >> <font color=red>基本信息设置</font>','SetParam','KS.System.asp');" title="基本信息设置">基本信息设置</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KMST10003") Then%>
<li><a href="KS.ClassMenu.asp" target="MainFrame" title="生成顶部菜单">生成顶部菜单</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KMST10003") Then%>
<li><a href="KS.TreeMenu.asp" target="MainFrame" title="生成树形菜单">生成树形菜单</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KMST10002") Then%>
<li><a href="#" onClick="SelectObjItem1(this,'系统设置 >> <font color=red>整合系统设置</font>','SetParam','KS.API.asp');" title="整合系统设置">API通用整合设置</a></li>
<%end if%>
</div>
<div class="dt"><img height=7 src="images/35.gif" width=5 align="left" style="margin:3px 0 0 8px;">辅 助 管 理</div>
<div class="dc">
<%If KS.ReturnPowerResult(0, "KMST10004") Then%>
<li><a href="KS.InnerLink.asp" target="MainFrame" title="内容关键字设置">内容关键字设置</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KMST10005") Then%>
<li><a href="KS.WebFilesMain.asp" target="MainFrame" title="站点文件管理">站点文件管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KMST10006") Then%>
<li><a href="KS.Log.asp" target="MainFrame" title="站点文件管理">后台日志管理</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KMST10007") Then%>
<li><a href="KS.Database.asp?Action=BackUp" target="MainFrame" title="备份/压缩数据库">备份/压缩数据库</a></li>
<%end if%>
<%If KS.ReturnPowerResult(0, "KMST10008") Then%>
<li><a href="KS.DataReplace.asp" target="MainFrame" t⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -