📄 setadmingrouppop.asp
字号:
新建管理员组</td>
<td><input name="PopList" type="checkbox" value="P040102" <%if InStr(1, rs1("PopLIst"),"P040102" ,1)<>0 then response.Write("checked") %>>
修改管理员组</td>
<td><input name="PopList" type="checkbox" value="P040103" <%if InStr(1, rs1("PopLIst"),"P040103" ,1)<>0 then response.Write("checked") %>>
删除管理员组</td>
<td><input name="PopList" type="checkbox" value="P040104" <%if InStr(1, rs1("PopLIst"),"P040104" ,1)<>0 then response.Write("checked") %>>
设置权限</td>
<td></td>
</tr>
<tr>
<td height="20"> <input name="PopList" type="checkbox" value="P040200" <%if InStr(1, rs1("PopLIst"),"P040200" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">管理员管理</font></td>
<td><input name="PopList" type="checkbox" value="P040201" <%if InStr(1, rs1("PopLIst"),"P040201" ,1)<>0 then response.Write("checked") %>>
新建管理员</td>
<td><input name="PopList" type="checkbox" value="P040202" <%if InStr(1, rs1("PopLIst"),"P040202" ,1)<>0 then response.Write("checked") %>>
修改管理员</td>
<td><input name="PopList" type="checkbox" value="P040203" <%if InStr(1, rs1("PopLIst"),"P040203" ,1)<>0 then response.Write("checked") %>>
删除管理员</td>
<td><input name="PopList" type="checkbox" value="P040204" <%if InStr(1, rs1("PopLIst"),"P040204" ,1)<>0 then response.Write("checked") %>>
设置密码</td>
<td><input name="PopList" type="checkbox" value="P040206" <%if InStr(1, rs1("PopLIst"),"P040206" ,1)<>0 then response.Write("checked") %>>
锁定管理员</td>
</tr>
<tr>
<td height="20"> <input name="PopList" type="checkbox" value="P040300" <%if InStr(1, rs1("PopLIst"),"P040300" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">会员组管理</font></td>
<td><input name="PopList" type="checkbox" value="P040301" <%if InStr(1, rs1("PopLIst"),"P040301" ,1)<>0 then response.Write("checked") %>>
新建会员组</td>
<td><input name="PopList" type="checkbox" value="P040302" <%if InStr(1, rs1("PopLIst"),"P040302" ,1)<>0 then response.Write("checked") %>>
修改会员组</td>
<td><input name="PopList" type="checkbox" value="P040303" <%if InStr(1, rs1("PopLIst"),"P040303" ,1)<>0 then response.Write("checked") %>>
删除会员组</td>
<td></td>
<td></td>
</tr>
<tr>
<td height="20"> <input name="PopList" type="checkbox" value="P040400" <%if InStr(1, rs1("PopLIst"),"P040400" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000"> 会员管理</font></td>
<td><input name="PopList" type="checkbox" value="P040401" <%if InStr(1, rs1("PopLIst"),"P040401" ,1)<>0 then response.Write("checked") %>>
新建会员</td>
<td><input name="PopList" type="checkbox" value="P040402" <%if InStr(1, rs1("PopLIst"),"P040402" ,1)<>0 then response.Write("checked") %>>
修改会员</td>
<td><input name="PopList" type="checkbox" value="P040403" <%if InStr(1, rs1("PopLIst"),"P040403" ,1)<>0 then response.Write("checked") %>>
删除会员</td>
<td><input name="PopList" type="checkbox" value="P040404" <%if InStr(1, rs1("PopLIst"),"P040404" ,1)<>0 then response.Write("checked") %>>
设置会员组</td>
<td><input name="PopList" type="checkbox" value="P040405" <%if InStr(1, rs1("PopLIst"),"P040405" ,1)<>0 then response.Write("checked") %>>
锁定会员</td>
</tr>
<tr>
<td height="20"> <input name="PopList" type="checkbox" value="P040700" <%if InStr(1, rs1("PopLIst"),"P040700" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000"> 积分管理</font></td>
<td><input name="PopList" type="checkbox" value="P040800" <%if InStr(1, rs1("PopLIst"),"P040800" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000"> 会员系统参数</font></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="20"> <input name="PopList" type="checkbox" value="P040900" <%if InStr(1, rs1("PopLIst"),"P040900" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000"> 举报管理</font></td>
<td><input name="PopList" type="checkbox" value="P040901" <%if InStr(1, rs1("PopLIst"),"P040901" ,1)<>0 then response.Write("checked") %>>
查看</td>
<td><input name="PopList" type="checkbox" value="P040902" <%if InStr(1, rs1("PopLIst"),"P040902" ,1)<>0 then response.Write("checked") %>>
删除</td>
<td><input name="PopList" type="checkbox" value="P040903" <%if InStr(1, rs1("PopLIst"),"P040903" ,1)<>0 then response.Write("checked") %>>
扣分</td>
<td><input name="PopList" type="checkbox" value="P040904" <%if InStr(1, rs1("PopLIst"),"P040904" ,1)<>0 then response.Write("checked") %>>
发站内信</td>
<td></td>
</tr>
<tr>
<td height="20"> <input name="PopList" type="checkbox" value="P041000" <%if InStr(1, rs1("PopLIst"),"P041000" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000"> 邮件列表</font></td>
<td><input name="PopList" type="checkbox" value="P041001" <%if InStr(1, rs1("PopLIst"),"P041001" ,1)<>0 then response.Write("checked") %>>
发送邮件</td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="20"> <input name="PopList" type="checkbox" value="P040500" <%if InStr(1, rs1("PopLIst"),"P040500" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">系统参数</font></td>
<td><input name="PopList" type="checkbox" value="P040501" <%if InStr(1, rs1("PopLIst"),"P040501" ,1)<>0 then response.Write("checked") %>>
新闻系统参数</td>
<td><input name="PopList" type="checkbox" value="P040502" <%if InStr(1, rs1("PopLIst"),"P040502" ,1)<>0 then response.Write("checked") %>>
下载系统参数</td>
<td><input name="PopList" type="checkbox" value="P040503" <%if InStr(1, rs1("PopLIst"),"P040503" ,1)<>0 then response.Write("checked") %>>
系统常量设置</td> <%
If HaveValueTF=1 then
%>
<td><input name="PopList" type="checkbox" value="P040504" <%if InStr(1, rs1("PopLIst"),"P040504" ,1)<>0 then response.Write("checked") %>>
商品参数设置</td>
<%End If%>
<td></td>
</tr>
<tr>
<td height="20"> <input name="PopList" type="checkbox" value="P041100" <%if InStr(1, rs1("PopLIst"),"P041100" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000"> RSS订阅设置</font></td>
<td><input name="PopList" type="checkbox" value="P041101" <%if InStr(1, rs1("PopLIst"),"P041101" ,1)<>0 then response.Write("checked") %>>
XML参数设置</td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td rowspan="2"><input name="PopList" type="checkbox" value="P040600" <%if InStr(1, rs1("PopLIst"),"P040600" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">数据库管理</font> </td>
<td height="20"><input name="PopList" type="checkbox" value="P0406001" <%if InStr(1, rs1("PopLIst"),"P0406001" ,1)<>0 then response.Write("checked") %>>
数据统计</td>
<td><input name="PopList" type="checkbox" value="P040602" <%if InStr(1, rs1("PopLIst"),"P040602" ,1)<>0 then response.Write("checked") %>>
空间占用</td>
<td><input name="PopList" type="checkbox" value="P040603" <%if InStr(1, rs1("PopLIst"),"P040603" ,1)<>0 then response.Write("checked") %>>
数据库备份</td>
<td><input name="PopList" type="checkbox" value="P040604" <%if InStr(1, rs1("PopLIst"),"P040604" ,1)<>0 then response.Write("checked") %>>
数据库压缩</td>
<td><input name="PopList" type="checkbox" value="P040605" <%if InStr(1, rs1("PopLIst"),"P040605" ,1)<>0 then response.Write("checked") %>>
执行SQl语句</td>
</tr>
<tr>
<td height="20"><input name="PopList" type="checkbox" value="P040606" <%if InStr(1, rs1("PopLIst"),"P040606" ,1)<>0 then response.Write("checked") %>>
删除日志</td>
<td><input name="PopList" type="checkbox" value="P040607" <%if InStr(1, rs1("PopLIst"),"P040607" ,1)<>0 then response.Write("checked") %>>
后台日志管理</td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td colspan="7" align="center" valign="top"><hr style="width:95%;"></td>
</tr>
<tr>
<td rowspan="2" align="center" valign="middle"><input name="PopList" type="checkbox" value="P050000" <%if InStr(1, rs1("PopLIst"),"P050000" ,1)<>0 then response.Write("checked") %>>
<strong>虚拟目录</strong></td>
<td height="20"><input name="PopList" type="checkbox" value="P050100" <%if InStr(1, rs1("PopLIst"),"P050100" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">新建目录</font></td>
<td><input name="PopList" type="checkbox" value="P050200" <%if InStr(1, rs1("PopLIst"),"P050200" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">删除目录</font></td>
<td> </td>
<td> </td>
<td> </td>
<td></td>
</tr>
<tr>
<td height="20"><input name="PopList" type="checkbox" value="P050300" <%if InStr(1, rs1("PopLIst"),"P050300" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">文件管理 </font></td>
<td><input name="PopList" type="checkbox" value="P050301" <%if InStr(1, rs1("PopLIst"),"P050301" ,1)<>0 then response.Write("checked") %>>
导入文件</td>
<td><input name="PopList" type="checkbox" value="P050302" <%if InStr(1, rs1("PopLIst"),"P050302" ,1)<>0 then response.Write("checked") %>>
删除文件</td>
<td> </td>
<td> </td>
<td></td>
</tr>
<tr>
<td colspan="7" align="center" valign="top"><hr style="width:95%;"></td>
</tr>
<tr>
<td rowspan="5" align="center" valign="middle"><input name="PopList" type="checkbox" value="P060000" <%if InStr(1, rs1("PopLIst"),"P060000" ,1)<>0 then response.Write("checked") %>>
<strong>JS管理</strong></td>
<td height="20"> <input name="PopList" type="checkbox" value="P060100" <%if InStr(1, rs1("PopLIst"),"P060100" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">新建自由JS</font></td>
<td><input name="PopList" type="checkbox" value="P060200" <%if InStr(1, rs1("PopLIst"),"P060200" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">修改自由JS</font></td>
<td><input name="PopList" type="checkbox" value="P060300" <%if InStr(1, rs1("PopLIst"),"P060300" ,1)<>0 then response.Write("checked") %>>
<font color="#FF0000">删除自由JS</font></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -