setting.asp

前台及后台用户名密码都是：gz35gz35.com

<!--#include file =../conn.asp-->
<!-- #include file="inc/const.asp" -->
<!--#include file="../inc/dv_loadcache.asp"-->
<%	
	Head()
	dim admin_flag,rs_c
	admin_flag=",1,"
	If Not Dvbbs.master or instr(","&session("flag")&",",admin_flag)=0 Then 
		Errmsg=ErrMsg + "<BR><li>本页面为管理员专用，请<a href=../admin_login.asp target=_top>登录</a>后进入。<br><li>您没有管理本页面的权限。"
		Call dvbbs_error()
	Else
		If request("action")="save" Then
			call saveconst()
		ElseIf request("action")="restore" Then
			Call restore()
		Else
			Call consted()
		end if
		Footer()
	end if

Sub consted()
Dim  sel
%>
<iframe width="260" height="165" id="colourPalette" src="../images/post/nc_selcolor.htm" style="visibility:hidden; position: absolute; left: 0px; top: 0px;border:1px gray solid" frameborder="0" scrolling="no" ></iframe>
<table border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
<form method="POST" action="setting.asp?action=save" name="theform">
<tr> 
<th width="100%" colspan=3 class="tableHeaderText" height=25>论坛基本设置（目前只提供一种设置)
</th></tr>
<tr> 
<td width="100%" class=Forumrow colspan=3 height=23>
<a href="#setting3">[基本信息]</a>&nbsp;<a href="#setting21">[论坛系统数据设置]</a>&nbsp;<a href="#setting6">[悄悄话选项]</a>&nbsp;<a href="#setting7">[论坛首页选项]</a>&nbsp;<a href="#setting8">[用户与注册选项]</a>&nbsp;<a href="#setting10">[系统设置]</a>&nbsp;<a href="#setting12">[在线和用户来源]</a>
</td>
</tr>
<tr> 
<td width="100%" class=Forumrow colspan=3 height=23>
<a href="#setting13">[邮件选项]</a>&nbsp;<a href="#setting14">[上传设置]</a>&nbsp;<a href="#setting15">[用户选项(签名、头衔、排行等)]</a>&nbsp;<a href="#setting16">[帖子选项]</a>&nbsp;<a href="#setting17">[防刷新机制]</a>&nbsp;<a href="#setting18">[论坛分页设置]</a>&nbsp;<a href="#setting19">[门派设置]</a>
</td>
</tr>
<tr> 
<td width="100%" class=Forumrow colspan=3 height=23>
<a href="#setting20">[搜索选项]</a>&nbsp;<a href="#settingxu">[<font color=blue>官方插件设置</font>]</a>&nbsp;<a href="#admin">[<font color=red>安全设置</font>]</a>&nbsp;<a href="challenge.asp">[<font color=blue>RSS/WAP/手机短信/在线支付</font>]</a>
<a href="#SettingVIP">[VIP用户组设置]</a>
</td>
</tr>
<tr> 
<td width="93%" class=bodytitle colspan=2 height=23>
如果您的论坛的设置搞乱了，可以使用<a href="?action=restore"><B>还原论坛默认设置</B></a>
</td>
<input type="hidden" id="forum_return" value="<b>还原论坛默认设置:</b><br><li>如果您把论坛设置搞乱了，可以点击还原论坛默认设置进行还原操作。<br><li>使用此操作将使您原来的设置无效而还原到论坛的默认设置，请确认您做了论坛备份或者记得还原后该做哪些针对您论坛所需要的设置">
<td class=bodytitle><a href=# onclick="helpscript(forum_return);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
<tr> 
<td width="50%" class=Forumrow>
<U>论坛默认使用风格</U></td>
<td width="43%" class=Forumrow>
<%
	Dim forum_sid,iforum_setting,stopreadme,forum_pack,iCssName,iCssID,iStyleName
	Dim Style_Option,css_Option,Forum_cid,TempOption
	set rs=dvbbs.execute("select forum_sid,forum_setting,forum_pack,forum_css from dv_setup")
	Forum_sid=rs(0)
	Forum_pack=Split(rs(2),"|||")
	Iforum_setting=split(rs(1),"|||")
	Forum_cid=Split(rs(3),"@@@")
	iCssName=split(Forum_cid(0),"|||")
	iCssID=split(Forum_cid(3),"|||")
	Rs.close:Set Rs=Nothing
	stopreadme=iforum_setting(5)
%>
<Select Size=1 Name="sid">
<%
For i=0 to UBound(iCssName)-1
	Response.Write "<Option value="""&i&""""
	If Forum_sid = i Then Response.Write " selected "
	Dvbbs.Name="StyleName"&iCssID(i)
	iStyleName=Dvbbs.value
	Response.Write ">"&iCssName(i)&" - "&iStyleName&"</Option>"
Next
%>
</Select>
</td>
<input type="hidden" id="forum_skin" value="<b>论坛默认使用风格:</b><br><li>在这里您可以选择您论坛的默认使用风格。<br><li>如果想改变论坛风格请到论坛风格模板管理中进行相关设置">
<td class=Forumrow><a href=# onclick="helpscript(forum_skin);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
<tr> 
<td class=forumRowHighlight><U>论坛当前状态</U><BR>维护期间可设置关闭论坛</td>
<td class=forumRowHighlight> 
<input type=radio name="forum_setting(21)" value=0 <%if Dvbbs.forum_setting(21)="0" then%>checked<%end if%>>打开&nbsp;
<input type=radio name="forum_setting(21)" value=1 <%if Dvbbs.forum_setting(21)="1" then%>checked<%end if%>>关闭&nbsp;
</td>
<input type="hidden" id="forum_open" value="<b>论坛当前状态:</b><br><li>如果您需要做更改程序、更新数据或者转移站点等需要暂时关闭论坛的操作，可在此处选择关闭论坛。<br><li>关闭论坛后，可直接使用论坛地址＋login.asp登录论坛，然后使用论坛地址＋admin_login.asp登录后台管理进行打开论坛的操作">
<td class=forumRowHighlight><a href=# onclick="helpscript(forum_open);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
<tr> 
<td class=Forumrow><U>维护说明</U><BR>在论坛关闭情况下显示，支持html语法</td>
<td class=Forumrow> 
<textarea name="StopReadme" cols="50" rows="3" ID="TDStopReadme"><%=Stopreadme%></textarea><br><a href="javascript:admin_Size(-3,'TDStopReadme')"><img src="images/minus.gif" unselectable="on" border='0'></a> <a href="javascript:admin_Size(3,'TDStopReadme')"><img src="images/plus.gif" unselectable="on" border='0'></a>
</td>
<input type="hidden" id="forum_opens" value="<b>论坛维护说明:</b><br><li>如果您在论坛当前状态中关闭了论坛，请在此输入维护说明，他将显示在论坛的前台给会员浏览，告知论坛关闭的原因，在这里可以使用HTML语法。">
<td class=forumRow><a href=# onclick="helpscript(forum_opens);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
<tr> 
<td class=forumRowHighlight>
<U>论坛定时设置：</U></td>
<td class=forumRowHighlight> 
<input type=radio name="forum_setting(69)" value="0" <%If Dvbbs.forum_setting(69)="0" Then %>checked <%End If%>>关 闭</option>
<input type=radio name="forum_setting(69)" value="1" <%If Dvbbs.forum_setting(69)="1" Then %>checked <%End If%>>定时关闭
<input type=radio name="forum_setting(69)" value="2" <%If Dvbbs.forum_setting(69)="2" Then %>checked <%End If%>>定时只读
</td>
<input type="hidden" id="forum_isopentime" value="<b>定时设置选择:</b><br><li>在这里您可以设置是否起用定时的各种功能，如果开启了本功能，请设置好下面选项中的论坛设置时间。<br><li>如果在非开放时间内需要更改本设置，可直接使用论坛地址＋login.asp登录论坛，然后使用论坛地址＋admin_login.asp登录后台管理进行打开论坛的操作">
<td class=forumRowHighlight><a href=# onclick="helpscript(forum_isopentime);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
<tr> 
<td class=Forumrow>
<U>定时设置</U><BR>请根据需要选择开或关</td>
<td class=Forumrow> 
<%
Dvbbs.forum_setting(70)=split(Dvbbs.forum_setting(70),"|")
If UBound(Dvbbs.forum_setting(70))<2 Then 
	Dvbbs.forum_setting(70)="1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1|1"
	Dvbbs.forum_setting(70)=split(Dvbbs.forum_setting(70),"|")
End If
For i= 0 to UBound(Dvbbs.forum_setting(70))
If i<10 Then Response.Write "&nbsp;"
%>
  <%=i%>点：<input type="checkbox" name="forum_setting(70)<%=i%>" value="1" <%If Dvbbs.forum_setting(70)(i)="1" Then %>checked<%End If%>>开
 <%
 If (i+1) mod 4 = 0 Then Response.Write "<br>"
 Next
 %>
</td>
<input type="hidden" id="forum_opentime" value="<b>论坛开放时间:</b><br><li>设置本选项请确认您打开了定时开放论坛功能。<br><li>本设置以小时为单位，请务必按规定正确填写<br><li>如果在非开放时间内需要更改本设置，可直接使用论坛地址＋login.asp登录论坛，然后使用论坛地址＋admin_login.asp登录后台管理进行打开论坛的操作">
<td class=forumRow><a href=# onclick="helpscript(forum_opentime);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
</table><a name="admin"></a><BR>
<table border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
<tr> 
<th width="100%" colspan=3  align=Left id=tabletitlelink  height=25><b>安全设置</b>[<a href="#top">顶部</a>]
</th></tr>
<tr> 
<td class=forumRow width="50%">
<U>后台管理目录的设定</U><br>缺省目录为admin为安全起见,不让其他人知道目录,请修改.</td>
<td class=forumRow width="43%"> 
<input type="text" name="Forum_AdminFolder" size="35" value="<%=Dvbbs.CacheData(33,0)%>"><br><BR><b>注意:</b>目录名称后面要有"/",如"admin/"
<input type="hidden" id="AdminFolder" value="<b>后台管理目录的设定:</b><br><li>在FTP上修改您的论坛的管理,目录名称。(缺省目录为admin)<br><li>然后重新修改管理目录,管理员登录后台后就可以自动被引导到您设定的目录.<br><li>除管理员外,其他人无法知道管理的地址.">
</td>
<td class=forumRowHighlight><a href=# onclick="helpscript(AdminFolder);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
</tr>
</table><BR>
<table border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
<tr> 
<th width="100%" colspan=3 class="tableHeaderText" height=25>动网官方自动通讯设置
</th></tr>
<tr> 
<td class=forumRow width="50%">
<U>是否起用动网官方自动通讯系统</U><BR>开启后可在论坛后台收到动网官方最新通知以及直接参与官方讨论区讨论和发贴</td>
<td class=forumRow width="43%"> 
<input type=radio name="forum_pack(0)" value=0 <%if cint(forum_pack(0))=0 then%>checked<%end if%>>否&nbsp;
<input type=radio name="forum_pack(0)" value=1 <%if cint(forum_pack(0))=1 then%>checked<%end if%>>是&nbsp;
</td>
<input type="hidden" id="forum_pack1" value="<b>是否起用动网自动更新通知系统:</b><br><li>开启后管理后台顶部会提示动网的最新程序、补丁、通知等。">
<td class=forumRow><a href=# onclick="helpscript(forum_pack1);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
<tr> 
<td class=ForumrowHighlight>
<U>开启通讯系统用户名与密码</U><BR>用户名与密码用符号“|||”分开<BR>用户名和密码请到 <a href="http://bbs.dvbbs.net/Union_GetUserInfo.asp" target=_blank><font color=blue>动网官方</font></a> 获取</td>
<td class=ForumrowHighlight>
<%
If UBound(forum_pack)<2 Then ReDim forum_pack(3)
%>
<input type=text size=21 name="forum_pack(1)" value="<%=forum_pack(1)%>|||<%=forum_pack(2)%>">
</td>
<input type="hidden" id="forum_pack2" value="<b>开启通知系统用户名与密码:</b><br><li>如要开启通知系统，请您先到动网官方论坛注册一个用户名并在动网通知系统里取得密码，并填写于此栏即可开启。">
<td class=forumRowHighlight><a href=# onclick="helpscript(forum_pack2);return false;" class="helplink"><img src="images/help.gif" border=0 title="点击查阅管理帮助！"></a></td>
</tr>
</table><BR>
<table border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
<tr> 
<th height=25 colspan=2 align=left id=tabletitlelink><a name="setting3"></a><b>论坛基本信息</b>[<a href="#top">顶部</a>]</th>
</tr>
<tr> 
<td width="50%" class=Forumrow> <U>论坛名称</U></td>
<td width="50%" class=Forumrow>  
<input type="text" name="Forum_info(0)" size="35" value="<%=Dvbbs.Forum_info(0)%>">
</td>
</tr>
<tr> 
<td width="50%" class=forumRowHighlight> <U>论坛的访问地址</U></td>
<td width="50%" class=forumRowHighlight>  
<input type="text" name="Forum_info(1)" size="35" value="<%=Dvbbs.Forum_info(1)%>">
</td>
</tr>
<tr> 
<td width="50%" class=forumRowHighlight> <U>论坛的创建日期(格式：YYYY-M-D)</U></td>
<td width="50%" class=forumRowHighlight>  
<input type="text" name="forum_setting(74)" size="35" value="<%=Dvbbs.forum_setting(74)%>">
</td>
</tr>
<tr> 
<td width="50%" class=forumRow> <U>论坛首页文件名</U></td>
<td width="50%" class=forumRow>  
<input type="text" name="Forum_info(11)" size="35" value="<%=Dvbbs.Forum_info(11)%>">
</td>
</tr>
<tr> 
<td width="50%" class=forumRowHighlight> <U>网站主页名称</U></td>
<td width="50%" class=forumRowHighlight>  
<input type="text" name="Forum_info(2)" size="35" value="<%=Dvbbs.Forum_info(2)%>">
</td>
</tr>
<tr> 
<td width="50%" class=forumRow> <U>网站主页访问地址</U></td>
<td width="50%" class=forumRow>  
<input type="text" name="Forum_info(3)" size="35" value="<%=Dvbbs.Forum_info(3)%>">
</td>
</tr>
<tr> 
<td width="50%" class=forumRowHighlight> <U>论坛管理员Email</U></td>
<td width="50%" class=forumRowHighlight>  
<input type="text" name="Forum_info(5)" size="35" value="<%=Dvbbs.Forum_info(5)%>">
</td>
</tr>
<tr> 
<td width="50%" class=forumRow> <U>联系我们的链接（不填写为Mailto管理员）</U></td>
<td width="50%" class=forumRow>  
<input type="text" name="Forum_info(7)" size="35" value="<%=Dvbbs.Forum_info(7)%>">
</td>
</tr>
<tr> 
<td width="50%" class=forumRowHighlight> <U>论坛首页Logo图片地址</U><BR>显示在论坛顶部左上角，可用相对路径或者绝对路径</td>
<td width="50%" class=forumRowHighlight>