<%@ LANGUAGE=VBScript CodePage=65001%>
<% response.charset="utf-8" %>
<% session.codepage=65001 %>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!--#include file="../LyricInc/access.asp"  -->
<!-- #include file="LyricInc/functions.asp" -->
<%
act=Request("act")
If act="save" Then 

set rs=server.createobject("adodb.recordset")
sql="select * from web_List"
rs.open(sql),cn,1,3
rs("ArticleCount")=trim(request.form("ArticleCount"))
rs("ArticleOrder")=trim(request.form("ArticleOrder"))
'rs("ProductCount")=trim(request.form("ProductCount"))
'rs("ProductOrder")=trim(request.form("ProductOrder"))
'rs("CaseCount")=trim(request.form("CaseCount"))
'rs("CaseOrder")=trim(request.form("CaseOrder"))
rs("MessageCount")=trim(request.form("MessageCount"))
rs("MessageOrder")=trim(request.form("MessageOrder"))
'rs("MessageShow")=trim(request.form("MessageShow"))
rs("MessageCheck")=trim(request.form("MessageCheck"))
rs.update
rs.close
set rs=nothing

response.Write "<script language='javascript' >alert('OK');location.href='List_Settings.asp';</script>"
end if
 %>
 
	<%
Call header()

%>
<%set rs=server.createobject("adodb.recordset")
sql="select * from web_List"
rs.open(sql),cn,1,1
if not rs.eof and not rs.bof then
%>
  <form id="form1" name="form1" method="post" action="?act=save">
         <script language='javascript'>
function checksignup1() {
if ( document.form1.web_name.value == '' ) {
window.alert('请输入qq号^_^');
document.form1.web_name.focus();
return false;}

return true;}
</script>

	<table cellpadding='3' cellspacing='1' border='0' class='tableBorder' align=center>
	<tr>
	  <th class='tableHeaderText' colspan=2 height=31>栏目列表设置</th>
	<tr>
	  <td height=23 colspan="2" class='forumRow'><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="20" class='TipTitle'>&nbsp;√ 操作提示</td>
        </tr>
        <tr>
          <td height="30" valign="top" class="TipWords"><p>1、设置完成后，请到 静态管理 处 更新所有页面查看设置效果。</p>
</td>
        </tr>
        <tr>
          <td height="10">&nbsp;</td>
        </tr>
      </table></td>
	  </tr>
	<tr>
	  <td height=23 colspan="2" class='forumRowHighLight'><strong>文章列表设置</strong></td>
	  </tr>
	<tr>
	  <td class='forumRow' height=23>排序方式</td>
	  <td class='forumRow'><label>
	       <input type="radio" name="ArticleOrder" value="time desc"<%
		if rs("ArticleOrder")="time desc" then
		response.write "checked"
		end if%>>
      时间顺序
      &nbsp;
      <input name="ArticleOrder" type="radio" value="time asc" <%if rs("ArticleOrder")="time asc" then
		response.write "checked"
		end if%>>
      时间倒序      
      </label></td>
	  </tr>	<tr>
	<td width="15%" height=23 class='forumRow'>每页显示数量</td>
	<td class='forumRow'><input name='ArticleCount' type='text' id='ArticleCount' value="<%=rs("ArticleCount")%>" size='10'> </td>
	</tr>
	

	<tr>
	  <td height=23 colspan="2" class='forumRowHighLight'><strong>留言列表设置</strong></td>
	  </tr>
	<tr>
	  <td class='forumRow' height=23>排序方式</td>
	  <td class='forumRow'><label>
	       <input type="radio" name="MessageOrder" value="time desc"<%
		if rs("MessageOrder")="time desc" then
		response.write "checked"
		end if%>>
      时间顺序
      &nbsp;
      <input name="MessageOrder" type="radio" value="time asc" <%if rs("MessageOrder")="time asc" then
		response.write "checked"
		end if%>>
      时间倒序      
      </label></td>
	  </tr>	<tr>
	<td width="15%" height=23 class='forumRow'>每页显示数量</td>
	<td class='forumRow'><input name='MessageCount' type='text' id='MessageCount' value="<%=rs("MessageCount")%>" size='10'> </td>
	</tr>
      
	<tr>
	  <td class='forumRow' height=23>是否审核后显示留言</td>
	  <td class='forumRow'><label>
	       <input type="radio" name="MessageCheck" value="0"<%
		if rs("MessageCheck")=0 then
		response.write "checked"
		end if%>>
      是
      &nbsp;
      <input name="MessageCheck" type="radio" value="1" <%if rs("MessageCheck")=1 then
		response.write "checked"
		end if%>>
      否      
      </label></td>
	  </tr>


	<tr><td height="100" colspan=2  class='forumRow2'><div class='ButtonFix' align="center">
	  <INPUT class='GPetSubmit' type=submit value='提 交'  onClick='javascript:return checksignup1()' name=Submit>
	  </div></td></tr>
	</table>
</form>

<%
Call DbconnEnd()
else
response.write "暂时无数据"
end if %>