admin_config.asp

后台登陆admin.asp

    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 前台上传文件最大数：</td>
      <td><input size="15" value="<%=uploadsize%>" name="uploadsize">KB/个</td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 前台上传的支持格式：</td>
      <td><input size="15" value="<%=uploadtype%>" name="uploadtype"> <img src="img/help.gif" border="0" alt="各个类型间用 | 隔开"></td>
    </tr>

    <tr class="Hxcmsss">
     <td colspan="2">留言评论相关设置</td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 发表留言的用户权限：</td>
      <td><%if Commentbook="会员" then%><input name="Commentbook" type="radio" value="会员" checked>
会员
  <input name="Commentbook" type="radio" value="游客">
游客<%else%><input name="Commentbook" type="radio" value="会员">
会员
  <input name="Commentbook" type="radio" value="游客" checked>
游客
<%end if%></td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 发表评论的用户权限：</td>
      <td><%if Commentview="会员" then%><input name="Commentview" type="radio" value="会员" checked>
会员
  <input name="Commentview" type="radio" value="游客">
游客<%else%><input name="Commentview" type="radio" value="会员">
会员
  <input name="Commentview" type="radio" value="游客" checked>
游客
<%end if%></td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 是否启用留言审核功能：</td>
      <td><%if bookpass="yes" then%><input name="bookpass" type="radio" value="yes" checked>
是&nbsp;&nbsp;&nbsp;
  <input name="bookpass" type="radio" value="no">
否<%else%><input name="bookpass" type="radio" value="yes">
是&nbsp;&nbsp;&nbsp;
  <input name="bookpass" type="radio" value="no" checked>
否
<%end if%></td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 是否开放友情链接申请：</td>
      <td><%if EnableLinkReg="yes" then%><input name="EnableLinkReg" type="radio" value="yes" checked>
是&nbsp;&nbsp;&nbsp;
  <input name="EnableLinkReg" type="radio" value="no">
否<%else%><input name="EnableLinkReg" type="radio" value="yes">
是&nbsp;&nbsp;&nbsp;
  <input name="EnableLinkReg" type="radio" value="no" checked>
否
<%end if%></td>
    </tr>
    <tr class="Hxcmsss">
     <td colspan="2">是否允许游客查看相应版面</td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 音乐设置：</td>
      <td><%if guestdj="yes" then%><input name="guestdj" type="radio" value="yes" checked>
允许
  <input name="guestdj" type="radio" value="no">
不允许<%else%><input name="guestdj" type="radio" value="yes">
允许
  <input name="guestdj" type="radio" value="no" checked>
不允许
<%end if%></td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 特效设置：</td>
      <td><%if guestjs="yes" then%><input name="guestjs" type="radio" value="yes" checked>
允许
  <input name="guestjs" type="radio" value="no">
不允许<%else%><input name="guestjs" type="radio" value="yes">
允许
  <input name="guestjs" type="radio" value="no" checked>
不允许
<%end if%></td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 下载设置：</td>
      <td><%if guestsoft="yes" then%><input name="guestsoft" type="radio" value="yes" checked>
允许
  <input name="guestsoft" type="radio" value="no">
不允许<%else%><input name="guestsoft" type="radio" value="yes">
允许
  <input name="guestsoft" type="radio" value="no" checked>
不允许
<%end if%></td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 文章设置：</td>
      <td><%if guestart="yes" then%><input name="guestart" type="radio" value="yes" checked>
允许
  <input name="guestart" type="radio" value="no">
不允许<%else%><input name="guestart" type="radio" value="yes">
允许
  <input name="guestart" type="radio" value="no" checked>
不允许
<%end if%></td>
    </tr>
    <tr class=Hxcmsds>
      <td height="25">&nbsp; 图片设置：</td>
      <td><%if guestpic="yes" then%><input name="guestpic" type="radio" value="yes" checked>
允许
  <input name="guestpic" type="radio" value="no">
不允许<%else%><input name="guestpic" type="radio" value="yes">
允许
  <input name="guestpic" type="radio" value="no" checked>
不允许
<%end if%></td>
    </tr>    
<tr class=Hxcmsss>
<td colspan="2">显示评论开关</td>
</tr>
<tr class=Hxcmsds>
<td height="25">&nbsp; 新闻评论：</td>
<td>
<%if point_news="1" then%><input name="point_news" type="radio" value="1" checked>&nbsp;开启&nbsp;&nbsp;<input type="radio" name="point_news" value="0">&nbsp;关闭<%else%>    
<input name="point_news" type="radio" value="1">&nbsp;开&nbsp;&nbsp;<input name="point_news" type="radio" value="0" checked>&nbsp;关闭<%end if%></td>
</tr>
<tr class=Hxcmsds>
<td height="25">&nbsp; 文章评论：</td>
<td>
<%if point_article="1" then%><input name="point_article" type="radio" value="1" checked>&nbsp;开启&nbsp;&nbsp;<input type="radio" name="point_article" value="0">&nbsp;关闭<%else%>    
<input name="point_article" type="radio" value="1">&nbsp;开启&nbsp;&nbsp;<input name="point_article" type="radio" value="0" checked>&nbsp;关闭<%end if%></td>
</tr>
<tr class=Hxcmsds>
<td height="25">&nbsp; 下载评论：</td>
<td>
<%if point_down="1" then%><input name="point_down" type="radio" value="1" checked>&nbsp;开启&nbsp;&nbsp;<input type="radio" name="point_down" value="0">&nbsp;关闭<%else%>    
<input name="point_down" type="radio" value="1">&nbsp;开启&nbsp;&nbsp;<input name="point_down" type="radio" value="0" checked>&nbsp;关闭<%end if%></td>
</tr>
<tr class=Hxcmsds>
<td height="25">&nbsp; 歌曲评论：</td>
<td>
<%if point_dj="1" then%><input name="point_dj" type="radio" value="1" checked>&nbsp;开启&nbsp;&nbsp;<input type="radio" name="point_dj" value="0">&nbsp;关闭<%else%>    
<input name="point_dj" type="radio" value="1">&nbsp;开启&nbsp;&nbsp;<input name="point_dj" type="radio" value="0" checked>&nbsp;关闭<%end if%></td>
</tr>
<tr class=Hxcmsds>
<td height="25">&nbsp; 特效评论：</td>
<td>
<%if point_js="1" then%><input name="point_js" type="radio" value="1" checked>&nbsp;开启&nbsp;&nbsp;<input type="radio" name="point_js" value="0">&nbsp;关闭<%else%>    
<input name="point_js" type="radio" value="1">&nbsp;开启&nbsp;&nbsp;<input name="point_js" type="radio" value="0" checked>&nbsp;关闭<%end if%></td>
</tr>
<tr class=Hxcmsds>
<td height="25">&nbsp; 笑话评论：</td>
<td>
<%if point_vid="1" then%><input name="point_vid" type="radio" value="1" checked>&nbsp;开启&nbsp;&nbsp;<input type="radio" name="point_vid" value="0">&nbsp;关闭<%else%>    
<input name="point_vid" type="radio" value="1">&nbsp;开启&nbsp;&nbsp;<input name="point_vid" type="radio" value="0" checked>&nbsp;关闭<%end if%></td>
</tr>
<tr class=Hxcmsds>
<td height="25">&nbsp; 图片评论：</td>
<td>
<%if point_pic="1" then%><input name="point_pic" type="radio" value="1" checked>&nbsp;开启&nbsp;&nbsp;<input type="radio" name="point_pic" value="0">&nbsp;关闭<%else%>      
<input name="point_pic" type="radio" value="1">&nbsp;开启&nbsp;&nbsp;<input name="point_pic" type="radio" value="0" checked>&nbsp;关闭<%end if%></td>
</tr>
<tr class=Hxcmsss>
<td colspan="2">其它设置</td>
</tr>
<tr class=Hxcmsds>
<td height="25">热门新闻最低点击数：</td>
<td width="*"><input size="5" value="<%=popnewsnum%>" name="popnewsnum"> 默认：150 次</td>
</tr>
<tr class=Hxcmsds>
<td height="25">热门线路最低点击数：</td>
<td width="*"><input size="5" value="<%=popartnum%>" name="popartnum"> 默认：150 次</td>
</tr>
<tr class=Hxcmsds>
<td height="25">热门手记最低点击数：</td>
<td width="*"><input size="5" value="<%=popwebnum%>" name="popwebnum"> 默认：150 次</td>
</tr>
<tr class=Hxcmsds>
<td height="25">热门程序最低点击数：</td>
<td width="*"><input size="5" value="<%=popsoftnum%>" name="popsoftnum"> 默认：150 次</td>
</tr>
<tr class=Hxcmsds>
<td height="25">热门音乐最低点击数：</td>
<td width="*"><input size="5" value="<%=popdjnum%>" name="popdjnum"> 默认：150 次</td>
</tr>
<tr class=Hxcmsds>
<td height="25">热门特效最低点击数：</td>
<td width="*"><input size="5" value="<%=popjsnum%>" name="popjsnum"> 默认：150 次</td>
</tr>
<tr class=Hxcmsds>
<td height="25">热门笑话最低点击数：</td>
<td width="*"><input size="5" value="<%=popjokenum%>" name="popjokenum"> 默认：150 次</td>
</tr>
<tr class=Hxcmsds>
<td height="25">热门图片最低点击数：</td>
<td width="*"><input size="5" value="<%=poppicnum%>" name="poppicnum"> 默认：150 次</td>
</tr>
<tr class=Hxcmsds>
<td height="25">后台每页显示数：</td>
<td width="*"><input size="5" value="<%=adflperpage%>" name="adflperpage"> 默认：30 条</td>
</tr>
<tr class=Hxcmsqs>
<td colspan="2" align="center"><input type="submit" value=" 更 新 数 据 " class="button"></td>
</tr>
</table>
<%
end sub

sub configok
sessionvar = replace(Trim(Request.Form("sessionvar")),CHR(34),"'")
hx_In = replace(Trim(Request.Form("hx_In")),CHR(34),"'")
bad_ip = replace(Trim(Request.Form("bad_ip")),CHR(34),"'")