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

📄 setadmingrouppower.asp

📁 SK信息采集2.0功能介绍: 1.可针对任何静态网页,动态网页进行采集。包括htm,html,shtml,ASP,ASPX,JSP,PHP等。 2.增加自定文件采集.用户可采集网页中的所有文件.
💻 ASP
📖 第 1 页 / 共 5 页
字号:
            </TR>
            
          </table>
          </FIELDSET></td>
		  </tr>
		  </table>
    <br>
	<table width="96%" border="0" cellspacing="0" cellpadding="0">    <tr>       <td>      <FIELDSET align=center>
          <LEGEND align=left>此管理组在【<font color="#FF0000">下载中心</font>】的权限</LEGEND>
          <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
		    <tr> 
              <td height="22"> 
                <%IF DownLoadPower=0 Then
			      Response.Write("<input name=""DownLoadPower"" type=""radio"" onclick=""Down.style.display='none';"" value=""0"" checked>")
			   Else
			      Response.Write("<input name=""DownLoadPower"" type=""radio"" onclick=""Down.style.display='none';"" value=""0"">")
			   End IF
			   %>
                在下载中心无任何管理权限(屏蔽)</td>
            </tr>
            <tr> 
              <td height="22">
			    <%IF DownLoadPower=1 Then
			      Response.Write("<input type=""radio"" onclick=""Down.style.display='none';"" name=""DownLoadPower"" value=""1"" Checked>")
				Else
			      Response.Write("<input type=""radio"" onclick=""Down.style.display='none';"" name=""DownLoadPower"" value=""1"">")
				End IF
				%>
                频道管理员:拥有所有频道的管理权限(相当于对下载中心没有任何限制) </td>
            </tr>
            <tr> 
              <td height="22">
			    <%IF DownLoadPower=2 Then
			     Response.Write("<input type=""radio"" onclick=""Down.style.display='';"" name=""DownLoadPower"" value=""2"" Checked>")
			   Else
			     Response.Write("<input type=""radio"" onclick=""Down.style.display='';"" name=""DownLoadPower"" value=""2"">")
			   End IF
			   %>
                栏目管理员:只拥有部分栏目(频道)管理权限</td>
            </tr>
            <tr ID="Down" <%IF DownLoadPower<>2 Then Response.Write("style=""display:none""") End IF%>>
              <td height="22"><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
                  <tr> 
                    <td height="25" colspan="7"><strong><font color="#993300">栏目与下载</font></strong></td>
                  </tr>
                  <tr> 
                    <td width="13%"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD10001"<%if InStr(1, PowerList,"KMD10001" ,1)<>0 then Response.Write(" checked") %>>
                      添加频道</td>
                    <td width="13%"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD10002"<%if InStr(1, PowerList,"KMD10002" ,1)<>0 then Response.Write(" checked") %>>
                      编辑频道</td>
                    <td width="13%"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD10003"<%if InStr(1, PowerList,"KMD10003" ,1)<>0 then Response.Write(" checked") %>>
                      删除频道</td>
                    <td width="13%"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD10004"<%if InStr(1, PowerList,"KMD10004" ,1)<>0 then Response.Write(" checked") %>>
                      添加栏目</td>
                    <td width="13%"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD10005"<%if InStr(1, PowerList,"KMD10005" ,1)<>0 then Response.Write(" checked") %>>
                      编辑栏目</td>
                    <td width="13%"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD10006"<%if InStr(1, PowerList,"KMD10006" ,1)<>0 then Response.Write(" checked") %>>
                      删除栏目</td>
                    <td width="13%"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD10007"<%if InStr(1, PowerList,"KMD10007" ,1)<>0 then Response.Write(" checked") %>>
                      加入JS</td>
                  </tr>
                  <tr> 
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10008"<%if InStr(1, PowerList,"KMD10008" ,1)<>0 then Response.Write(" checked") %>>
                      加入专题</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10009"<%if InStr(1, PowerList,"KMD10009" ,0)<>0 then Response.Write(" checked") %>>
                      批量审核</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10010"<%if InStr(1, PowerList,"KMD10010" ,0)<>0 then Response.Write( "checked") %>>
                      取消审核</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10011"<%if InStr(1, PowerList,"KMD10011" ,1)<>0 then Response.Write( "checked") %>>
                      搜索下载</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10012"<%if InStr(1, PowerList,"KMD10012" ,1)<>0 then Response.Write( "checked") %>>
                      添加下载</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10013"<%if InStr(1, PowerList,"KMD10013" ,1)<>0 then Response.Write( "checked") %>>
                      编辑下载</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10014"<%if InStr(1, PowerList,"KMD10014" ,1)<>0 then Response.Write( "checked") %>>
                      删除下载</td>
                  </tr>
                  <tr> 
                    <td><input name="PowerList" type="checkbox" id="PowerList5" value="KMD10015"<%if InStr(1, PowerList,"KMD10015" ,1)<>0 then Response.Write(" checked") %>>
预览下载</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList6" value="KMD10016"<%if InStr(1, PowerList,"KMD10016" ,1)<>0 then Response.Write(" checked") %>>
上传文件</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10018" checked<%if InStr(1, PowerList,"KMD10018" ,1)<>0 then Response.Write(" checked") %>>
评论管理</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10017"<%if InStr(1, PowerList,"KMD10017" ,1)<>0 then Response.Write(" checked") %>>
剪切复制操作</td>
                    <td><input name="PowerList" type="checkbox" id="PowerList" value="KMD10019"<%if InStr(1, PowerList,"KMD10019" ,1)<>0 then Response.Write(" checked") %>>
签收软件</td>
                    <td>&nbsp;</td>
                    <td>&nbsp;</td>
                  </tr>
                  <tr> 
                    <td height="25" colspan="7"><strong><font color="#993300">常规管理</font></strong></td>
                  </tr>
                  <tr> 
                    <td nowrap> <input name="PowerList" type="checkbox" id="PowerList" value="KMD20000"<%if InStr(1, PowerList,"KMD20000" ,1)<>0 then Response.Write( "checked") %>>
                      下载参数设置</td>
					<td nowrap> <input name="PowerList" type="checkbox" id="PowerList" value="KMD20004"<%if InStr(1, PowerList,"KMD20004" ,1)<>0 then Response.Write( "checked") %>>
                      镜像服务器管理</td>
                    <td height="20" nowrap title="浏览、编辑、删除关键字等操作的权限"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD20001"<%if InStr(1, PowerList,"KMD20001" ,1)<>0 then Response.Write( "checked") %>>
                      下载关键字管理</td>
                    <td nowrap title="浏览、编辑、删除下载来源等操作的权限"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD20002"<%if InStr(1, PowerList,"KMD20002" ,1)<>0 then Response.Write( "checked") %>>
                      下载来源管理</td>
                    <td nowrap title="浏览、编辑、删除下载作者等操作的权限"> <input name="PowerList" type="checkbox" id="PowerList" value="KMD20003"<%if InStr(1, PowerList,"KMD20003" ,1)<>0 then Response.Write( "checked") %>>
                      下载作者管理</td>
                    <td nowrap>&nbsp;</td>
                    <td>&nbsp;</td>
                  </tr>
                  <tr> 
                    <td height="5" colspan="7"></td>
                  </tr>
                  <tr> 
                    <td height="25" colspan="7"><font color="#993300"><strong>详细指定栏目(频道)权限</strong></font></td>
                  </tr>
                  <tr> 
                    <td colspan="7"> 
                       <div style="border: double #E7E7E7;height:150; overflow: auto; width:100%"> 
                        <table border="0" cellspacing="0" cellpadding="0">
                          <% 
					Set FolderRS = Conn.Execute("Select * from KS_Class where TN='0' and ChannelID=3 and DelTF=0 Order BY FolderOrder")
					IF FolderRS.Bof And FolderRS.Eof Then
					 Response.Write("<br><li>还没有添加隶属下载的任何频道!")
					End IF
                    do while Not FolderRS.Eof
	                  if InStr(1,PowerList,Trim(FolderRS("ID")),1)<>0 then CheckStr=" checked"%>
                          
                          <tr> 
                            <td><table border="0" cellspacing="0" cellpadding="0">
                                <tr align="left" class="TempletItem"> 
                                  <td><img src="../Images/Folder/domain.gif" width="26" height="24"></td>
                                  <td><input name="PowerList" type="checkbox" value="<% = FolderRS("ID") %>"<%=CheckStr%>> 
                                    <% = FolderRS("FolderName") %>                                     </td>
                                </tr>
                              </table></td>
                          </tr>
                          <%
	                     CheckStr = ""
	                     Response.Write(GetChildClassList(FolderRS("ID"),""))
	                  FolderRS.MoveNext
                      loop
                        %>
                        </table>
                      </div></td>
                  </tr>
                </table></td>
            </TR>
            
          </table>
          </FIELDSET></td>
		  </tr>
    </table>
		  <br>
	<table width="96%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td><fieldset align="center">
      <legend align="left">此管理组在【<font color="#FF0000">Flash中心</font>】的权限</legend>
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="22"><%IF FlashPower=0 Then
			      Response.Write("<input name=""FlashPower"" type=""radio"" onclick=""Flash.style.display='none';"" value=""0"" checked>")
			   Else
			      Response.Write("<input name=""FlashPower"" type=""radio"" onclick=""Flash.style.display='none';"" value=""0"">")
			   End IF
			   %>
            在Flash中心无任何管理权限(屏蔽)</td>
        </tr>
        <tr>
          <td height="22"><%IF FlashPower=1 Then
			      Response.Write("<input type=""radio"" onclick=""Flash.style.display='none';"" name=""FlashPower"" value=""1"" Checked>")
				Else
			      Response.Write("<input type=""radio"" onclick=""Flash.style.display='none';"" name=""FlashPower"" value=""1"">")
				End IF
				%>
            频道管理员:拥有所有频道的管理权限(相当于对Flash中心没有任何限制) </td>
        </tr>
        <tr>
          <td height="22"><%IF FlashPower=2 Then
			     Response.Write("<input type=""radio"" onclick=""Flash.style.display='';"" name=""FlashPower"" value=""2"" Checked>")
			   Else
			     Response.Write("<input type=""radio"" onclick=""Flash.style.display='';"" name=""FlashPower"" value=""2"">")
			   End IF
			   %>
            栏目管理员:只拥有部分栏目(频道)管理权限</td>
        </tr>
        <tr id="Flash" <%IF FlashPower<>2 Then Response.Write("style=""display:none""") End IF%>>
          <td height="22"><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td height="25" colspan="7"><strong><font color="#993300">栏目与Flash</font></strong></td>
            </tr>
            <tr>
              <td width="13%"><input name="PowerList" type="checkbox" id="PowerList" value="KMF10001"<%if InStr(1, PowerList,"KMF10001" ,1)<>0 then Response.Write(" checked") %> />
                添加频道</td>
              <td width="13%"><input name="PowerList" type="checkbox" id="PowerList" value="KMF10002"<%if InStr(1, PowerList,"KMF10002" ,1)<>0 then Response.Write(" checked") %> />
                编辑频道</td>
              <td width="13%"><input name="PowerList" type="checkbox" id="PowerList" value="KMF10003"<%if InStr(1, PowerList,"KMF10003" ,1)<>0 then Response.Write(" checked") %> />
                删除频道</td>
              <td width="13%"><input name="PowerList" type="checkbox" id="PowerList" value="KMF10004"<%if InStr(1, PowerList,"KMF10004" ,1)<>0 then Response.Write(" checked") %> />
                添加栏目</td>
              <td width="13%"><input name="PowerList" type="checkbox" id="PowerList" value="KMF10005"<%if InStr(1, PowerList,"KMF10005" ,1)<>0 then Response.Write(" checked") %> />
                编辑栏目</td>
              <td width="13%"><input name="PowerList" type="checkbox" id="PowerList" value="KMF10006"<%if InStr(1, PowerList,"KMF10006" ,1)<>0 then Response.Write(" checked") %> />

⌨️ 快捷键说明

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