<!--#include file="conn.asp"-->
<!--#include file="Admin_Chkpass.asp"-->
<%
dim action
Action=trim(request("Action"))
if Action="saveconfig" then
	response.Write Action
	call saveconfig()
else
	call showconfig()
end if

sub showconfig()
dim rs
set rs=conn.execute("select * from bloginfo")	
%>
<html>
<head>
<title>专题管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="Admin_STYLE.CSS" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" class="bgcolor" >
  <br>
  <table width="98%" border="0" align="center" cellpadding="2" cellspacing="1" Class="border">
    <tr class="topbg"> 
      
    <td height="22" colspan=2 align=center><b>网 站 配 置</b></td>
    </tr>
    <tr > 
      <td width="70" height="30"><strong>管理导航：</strong></td>
      
    <td height="30"><a href="Admin_SiteConfig.asp">网站信息配置</a> | <a href="Admin_SiteConfig.asp">网站选项配置</a> 
      | <a href="#user">用户信息选项</a> | <a href="#show">日志显示选项</a> | <a href="#upload">上传选项</a></td>
    </tr>
</table>

<form method="POST" action="Admin_SiteConfig.asp" id="form1" name="form1">
  <table width="98%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FFFFFF" Class="border">
    <tr > 
      <td height="22" colspan="2" class="topbg"> <a name="SiteInfo"></a><strong>网站信息配置</strong></td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >网站名称：</td>
      <td width="368" height="25" > <input name="SiteName" type="text" id="SiteName" value="<%=rs("sitename")%>" size="40" maxlength="50"> 
      </td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >网站标题：</td>
      <td width="368" height="25" > <input name="SiteTitle" type="text" id="SiteTitle" value="<%=rs("SiteTitle")%>" size="40" maxlength="50"> 
      </td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >网站地址：<br>
        重要！请添写完整URL地址,如http://www.yan163.com/blog/,此设置将影响到rss和trackback的正常运行。</td>
      <td width="368" height="25" > <input name="SiteUrl" type="text" id="SiteUrl" value="<%=rs("SiteUrl")%>" size="40" maxlength="255"> 
      </td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >网站域名：<br>
        用于二级域名，请按照yan163.com这样的形式书写。</td>
      <td width="368" height="25" > <input name="CopyrightUrl" type="text" id="CopyrightUrl" value="<%=rs("copyrightUrl")%>" size="40" maxlength="255"> 
      </td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >站长姓名：</td>
      <td width="368" height="25" > <input name="WebmasterName" type="text" id="WebmasterName" value="<%=rs("WebmasterName")%>" size="40" maxlength="20"> 
      </td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >站长信箱：</td>
      <td width="368" height="25" > <input name="WebmasterEmail" type="text" id="WebmasterEmail" value="<%=rs("WebmasterEmail")%>" size="40" maxlength="100"> 
      </td>
    </tr>
    <tr> 
      <td height="25" colspan="2" class="topbg"><a name="SiteOption"></a><b>网站选项配置</b></td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >是否开启日志审核（日志审核后才能显示）：</td>
      <td height="25" > <input type="radio" name="blogcheck" value="true" <%if rs("blogcheck")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="blogcheck" value="false" <%if rs("blogcheck")="false"  then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >发表日志，系统日志分类是否为必须：</td>
      <td height="25" ><input type="radio" name="needclassid" value="true" <%if rs("needclassid")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="needclassid" value="false" <%if rs("needclassid")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td height="25" >是否允许游客发表评论及留言：</td>
      <td height="25" > <input type="radio" name="enguestcomment" value="true" <%if rs("enguestcomment")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="enguestcomment" value="false" <%if rs("enguestcomment")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >发表日志时，当敏感字出现多少次以上，日志自动转为待审核：</td>
      <td height="25" ><input name="maxbadstr_num" type="text" id="maxbadstr_num" value="<%=rs("maxbadstr_num")%>" size="10" maxlength="10">
        次</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td height="25" >是否开启二级域名：</td>
      <td height="25" ><input type="radio" name="gourl" value="true" <%if rs("gourl")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="gourl" value="false" <%if rs("gourl")="false"  then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >时差设置：<br> </td>
      <td height="25" > <select name="timediff" id="timediff">
          <option value="-24"<%if rs("timediff")=-24 then response.write "selected"%>>-24</option>
          <option value="-23"<%if rs("timediff")=-23 then response.write "selected"%>>-23</option>
          <option value="-22"<%if rs("timediff")=-22 then response.write "selected"%>>-22</option>
          <option value="-21"<%if rs("timediff")=-21 then response.write "selected"%>>-21</option>
          <option value="-20"<%if rs("timediff")=-20 then response.write "selected"%>>-20</option>
          <option value="-19"<%if rs("timediff")=-19 then response.write "selected"%>>-19</option>
          <option value="-18"<%if rs("timediff")=-18 then response.write "selected"%>>-18</option>
          <option value="-17"<%if rs("timediff")=-17 then response.write "selected"%>>-17</option>
          <option value="-16"<%if rs("timediff")=-16 then response.write "selected"%>>-16</option>
          <option value="-15"<%if rs("timediff")=-15 then response.write "selected"%>>-15</option>
          <option value="-14"<%if rs("timediff")=-14 then response.write "selected"%>>-14</option>
          <option value="-13"<%if rs("timediff")=-13 then response.write "selected"%>>-13</option>
          <option value="-12"<%if rs("timediff")=-12 then response.write "selected"%>>-12</option>
          <option value="-11"<%if rs("timediff")=-11 then response.write "selected"%>>-11</option>
          <option value="-10"<%if rs("timediff")=-10 then response.write "selected"%>>-10</option>
          <option value="-9"<%if rs("timediff")=-9 then response.write "selected"%>>-9</option>
          <option value="-8"<%if rs("timediff")=-8 then response.write "selected"%>>-8</option>
          <option value="-7"<%if rs("timediff")=-7 then response.write "selected"%>>-7</option>
          <option value="-6"<%if rs("timediff")=-6 then response.write "selected"%>>-6</option>
          <option value="-5"<%if rs("timediff")=-5 then response.write "selected"%>>-5</option>
          <option value="-4"<%if rs("timediff")=-4 then response.write "selected"%>>-4</option>
          <option value="-3"<%if rs("timediff")=-3 then response.write "selected"%>>-3</option>
          <option value="-2"<%if rs("timediff")=-2 then response.write "selected"%>>-2</option>
          <option value="-1"<%if rs("timediff")=-1 then response.write "selected"%>>-1</option>
          <option value="0" <%if rs("timediff")=0 then response.write "selected"%>>0</option>
          <option value="1"<%if rs("timediff")=1 then response.write "selected"%>>1</option>
          <option value="2"<%if rs("timediff")=2 then response.write "selected"%>>2</option>
          <option value="3"<%if rs("timediff")=3 then response.write "selected"%>>3</option>
          <option value="4"<%if rs("timediff")=4 then response.write "selected"%>>4</option>
          <option value="5"<%if rs("timediff")=5 then response.write "selected"%>>5</option>
          <option value="6"<%if rs("timediff")=6 then response.write "selected"%>>6</option>
          <option value="7"<%if rs("timediff")=7 then response.write "selected"%>>7</option>
          <option value="8"<%if rs("timediff")=8 then response.write "selected"%>>8</option>
          <option value="9"<%if rs("timediff")=9 then response.write "selected"%>>9</option>
          <option value="10"<%if rs("timediff")=10 then response.write "selected"%>>10</option>
          <option value="11"<%if rs("timediff")=11 then response.write "selected"%>>11</option>
          <option value="12"<%if rs("timediff")=12 then response.write "selected"%>>12</option>
          <option value="13"<%if rs("timediff")=13 then response.write "selected"%>>13</option>
          <option value="14"<%if rs("timediff")=14 then response.write "selected"%>>14</option>
          <option value="15"<%if rs("timediff")=15 then response.write "selected"%>>15</option>
          <option value="16"<%if rs("timediff")=16 then response.write "selected"%>>16</option>
          <option value="17"<%if rs("timediff")=17 then response.write "selected"%>>17</option>
          <option value="18"<%if rs("timediff")=18 then response.write "selected"%>>18</option>
          <option value="19"<%if rs("timediff")=19 then response.write "selected"%>>19</option>
          <option value="20"<%if rs("timediff")=20 then response.write "selected"%>>20</option>
          <option value="21"<%if rs("timediff")=21 then response.write "selected"%>>21</option>
          <option value="22"<%if rs("timediff")=22 then response.write "selected"%>>22</option>
          <option value="23"<%if rs("timediff")=23 then response.write "selected"%>>23</option>
          <option value="24"<%if rs("timediff")=24 then response.write "selected"%>>24</option>
        </select>
        小时</td>
    </tr>
    <tr> 
      <td height="25" colspan="2" class="topbg"><a name="show"></a><b>日志显示选项</b></td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >list列表每页显示多少条日志标题</td>
      <td height="25" ><input name="show_log_num" type="text" id="show_log_num" value="<%=rs("show_log_num")%>" size="10" maxlength="10"> 
      </td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" ><p>list列表调用前多少篇日志</p></td>
      <td height="25" ><input name="getlog_num" type="text" id="getlog_num" value="<%=rs("getlog_num")%>" size="10" maxlength="10"></td>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >评论是否顺序排列：</td>
      <td height="25" ><input type="radio" name="show_comment_asc" value="true" <%if rs("show_comment_asc")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="show_comment_asc" value="false" <%if rs("show_comment_asc")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td height="25" >站点关键字（更容易被搜索引擎找到,&quot;,&quot;号隔开）</td>
      <td height="25" ><input name="site_keyword" type="text" id="site_keyword" value="<%=rs("site_keyword")%>" size="40" maxlength="100"></td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td height="25" >博客列表每页显示条数</td>
      <td height="25" ><input name="show_listuser_num" type="text" id="show_listuser_num" value="<%=rs("show_listuser_num")%>" size="10" maxlength="10"></td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td height="25" >图片自动缩小宽度（为零不缩放）</td>
      <td height="25" ><input name="show_imgw_num" type="text" id="show_imgw_num" value="<%=rs("show_imgw_num")%>" size="10" maxlength="10">
        像素</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >图片是否随鼠标滚轮缩放：</td>
      <td height="25" > <input type="radio" name="show_img_mouse" value="true" <%if rs("show_img_mouse")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="show_img_mouse" value="false" <%if rs("show_img_mouse")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >部分显示日志是否使用htm标记强化过滤：<br>
        （若选择此项，所有除图片以外的标记都将被过滤掉）</td>
      <td height="25" > <input type="radio" name="blog_profilt" value="true" <%if rs("blog_profilt")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="blog_profilt" value="false" <%if rs("blog_profilt")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >是否显示底部页面执行时间：</td>
      <td height="25" > <input type="radio" name="blog_showruntime" value="true" <%if rs("blog_showruntime")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="blog_showruntime" value="false" <%if rs("blog_showruntime")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >是否显示底部页面累计刷新次数：</td>
      <td height="25" > <input type="radio" name="blog_showrefu" value="true" <%if rs("blog_showrefu")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="blog_showrefu" value="false" <%if rs("blog_showrefu")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr> 
      <td height="25" colspan="2" class="topbg"><a name="user" id="user"></a><strong>用户选项</strong></td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" >是否允许新用户注册：</td>
      <td height="25" > <input type="radio" name="EnableUserReg" value="true" <%if rs("EnableUserReg")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="EnableUserReg" value="false" <%if rs("EnableUserReg")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'"> 
      <td width="400" height="25" > <p>新用户注册是否需要管理员认证：<br>
          若选择是，则用户必须在通过管理员认证后才能真正成功正式注册用户。</p></td>
      <td height="25" > <input type="radio" name="AdminCheckReg" value="true" <%if rs("AdminCheckReg")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="AdminCheckReg" value="false" <%if rs("AdminCheckReg")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" ><p >新会员的默认级别： </p></td>
      <td height="25" ><select name="reguserlevel" id="reguserlevel">
          <option value="7" <%if rs("reguserlevel")=7 then response.write "selected"%>>普通会员</option>
          <option value="8" <%if rs("reguserlevel")=8 then response.write "selected"%>>VIP会员</option>
        </select> </td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >VIP用户是否能查看密码日志及隐藏日志：</td>
      <td height="25" ><input name="vip_prosee" type="radio" value="true" <%if rs("vip_prosee")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="vip_prosee" value="false" <%if rs("vip_prosee")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr> 
      <td height="25" colspan="2" class="topbg"><a name="upload" id="user"></a><strong>上传选项</strong></td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >上传文件路径(修改后需要到ftp新建目录及转移文件)：</td>
      <td height="25" ><input name="upfile_path" type="text" id="upfile_path" value="<%=rs("upfile_path")%>" size="20" maxlength="80"></td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >是否允许普通会员上传文件：</td>
      <td height="25" ><input type="radio" name="upfile_user" value="true" <%if rs("upfile_user")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="upfile_user" value="false" <%if rs("upfile_user")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >普通会员上传文件类型：</td>
      <td height="25" ><input name="upfile_user_type" type="text" id="upfile_user_type" value="<%=rs("upfile_user_type")%>" size="20" maxlength="80"></td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >普通会员上传单个文件大小：</td>
      <td height="25" ><input name="upfile_user_size" type="text" id="upfile_user_size" value="<%=rs("upfile_user_size")%>" size="10" maxlength="10">
        KB</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >是否允许VIP会员上传文件：</td>
      <td height="25" ><input type="radio" name="upfile_vip" value="true" <%if rs("upfile_vip")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="upfile_vip" value="false" <%if rs("upfile_vip")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >VIP会员上传文件类型：</td>
      <td height="25" ><input name="upfile_vip_type" type="text" id="upfile_vip_type" value="<%=rs("upfile_vip_type")%>" size="20" maxlength="80"></td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >VIP会员上传单个文件大小：</td>
      <td height="25" ><input name="upfile_vip_size" type="text" id="upfile_vip_size" value="<%=rs("upfile_vip_size")%>" size="10" maxlength="10">
        KB</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >是否允许前台管理员上传文件：</td>
      <td height="25" ><input type="radio" name="upfile_admin" value="true" <%if rs("upfile_admin")="true" then response.write "checked"%>>
        是 &nbsp;&nbsp;&nbsp;&nbsp; <input type="radio" name="upfile_admin" value="false" <%if rs("upfile_admin")="false" then response.write "checked"%>>
        否</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >前台管理员上传文件类型：</td>
      <td height="25" ><input name="upfile_admin_type" type="text" id="upfile_admin_type" value="<%=rs("upfile_admin_type")%>" size="20" maxlength="80"></td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >前台管理员上传单个文件大小：</td>
      <td height="25" ><input name="upfile_admin_size" type="text" id="upfile_admin_size" value="<%=rs("upfile_admin_size")%>" size="10" maxlength="10">
        KB</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >普通会员上传空间大小：</td>
      <td height="25" ><input name="upfile_user_maxsize" type="text" id="upfile_user_maxsize" value="<%=rs("upfile_user_maxsize")%>" size="10" maxlength="10">
        KB(不能为零或者空)</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >VIP会员上传空间大小：</td>
      <td height="25" ><input name="upfile_vip_maxsize" type="text" id="upfile_vip_maxsize" value="<%=rs("upfile_vip_maxsize")%>" size="10" maxlength="10">
        KB(不能为零或者空)</td>
    </tr>
    <tr class="tdbg" onmouseover="this.style.backgroundColor='#BFDFFF'" onmouseout="this.style.backgroundColor=''"> 
      <td height="25" >前台管理员上传空间大小：</td>
      <td height="25" ><input name="upfile_admin_maxsize" type="text" id="upfile_admin_maxsize" value="<%=rs("upfile_admin_maxsize")%>" size="10" maxlength="10">
        KB(不能为零或者空)</td>
    </tr>
    <tr> 
      <td height="40" colspan="2" align="center" class="tdbg" > <input name="Action" type="hidden" id="Action" value="saveconfig"> 
        <input name="cmdSave" type="submit" id="cmdSave" value=" 保存设置 " > </td>
    </tr>
  </table>

</form>
<% call copyright()%>
</body>
</html>
<%
set rs=nothing
call closeconn
end sub

sub saveconfig()
dim rs,sql
set rs=server.CreateObject("adodb.recordset")
sql="select * from bloginfo"
rs.open sql,conn,1,3
rs("SiteName")=trim(request("sitename"))
rs("sitetitle")=trim(request("sitetitle"))
rs("siteurl")=trim(request("siteurl"))
rs("copyrighturl")=trim(request("copyrighturl"))
rs("webmastername")=trim(request("webmastername"))
rs("webmasteremail")=trim(request("webmasteremail"))
rs("show_log_num")=trim(request("show_log_num"))
rs("blogcheck")=trim(request("blogcheck"))
rs("commentcheck")="false"'trim(request("commentcheck"))
rs("gourl")=trim(request("gourl"))
rs("timediff")=trim(request("timediff"))
'rs("sessiontimeout")=trim(request("sessiontimeout"))
rs("enableuserReg")=trim(request("enableuserReg"))
rs("AdminCheckReg")=trim(request("AdminCheckReg"))
rs("enguestcomment")=trim(request("enguestcomment"))
rs("showedittime")="false"'trim(request("showedittime"))
rs("site_keyword")=trim(request("site_keyword"))
rs("show_listuser_num")=clng(trim(request("show_listuser_num")))
rs("reguserlevel")=clng(trim(request("reguserlevel")))
if request("getlog_num")="" then
	rs("getlog_num")=500
else
	rs("getlog_num")=clng(trim(request("getlog_num")))
end if

if request("show_imgw_num")="" then
	rs("show_imgw_num")=0
else
	rs("show_imgw_num")=clng(trim(request("show_imgw_num")))
end if

rs("show_img_mouse")=trim(request("show_img_mouse"))
rs("blog_profilt")=trim(request("blog_profilt"))
rs("blog_showruntime")=trim(request("blog_showruntime"))
rs("blog_showrefu")=trim(request("blog_showrefu"))
rs("vip_prosee")=trim(request("vip_prosee"))

rs("upfile_user")=trim(request("upfile_user"))
rs("upfile_user_type")=trim(request("upfile_user_type"))
if request("upfile_user_size")="" then
	rs("upfile_user_size")=0
else
	rs("upfile_user_size")=clng(trim(request("upfile_user_size")))
end if

rs("upfile_vip")=trim(request("upfile_vip"))
rs("upfile_vip_type")=trim(request("upfile_vip_type"))
if request("upfile_vip_size")="" then
	rs("upfile_vip_size")=0
else
	rs("upfile_vip_size")=clng(trim(request("upfile_vip_size")))
end if

rs("upfile_admin")=trim(request("upfile_admin"))
rs("upfile_admin_type")=trim(request("upfile_admin_type"))
if request("upfile_admin_size")="" then
	rs("upfile_admin_size")=0
else
	rs("upfile_admin_size")=clng(trim(request("upfile_admin_size")))
end if

if request("maxbadstr_num")="" then
	rs("maxbadstr_num")=0
else
	rs("maxbadstr_num")=clng(trim(request("maxbadstr_num")))
end if

rs("upfile_path")=trim(request("upfile_path"))
rs("show_comment_asc")=trim(request("show_comment_asc"))
'response.Write clng(trim(request("reguserlevel"))
if request("upfile_user_maxsize")="" then
	rs("upfile_user_maxsize")=0
else
	rs("upfile_user_maxsize")=clng(trim(request("upfile_user_maxsize")))
end if
if request("upfile_vip_maxsize")="" then
	rs("upfile_vip_maxsize")=0
else
	rs("upfile_vip_maxsize")=clng(trim(request("upfile_vip_maxsize")))
end if
if request("upfile_admin_maxsize")="" then
	rs("upfile_admin_maxsize")=0
else
	rs("upfile_admin_maxsize")=clng(trim(request("upfile_admin_maxsize")))
end if

rs("needclassid")=trim(request("needclassid"))

rs.update
rs.close
set rs=nothing
call PutApplicationValue()
call closeconn
response.Redirect "admin_siteconfig.asp"
end sub
%>
