📄 admin_setup.asp
字号:
<!--#include file="Inc/Const.asp"-->
<%
if Not Cl.TrueOtherPurview("Setup") then
Cl.ShowErr("<br /><li>您无此操作权限！</li>")
end if
dim Action
dim strDir,strAdminDir
strDir=Trim(request.ServerVariables("SCRIPT_NAME"))
strAdminDir=split(strDir,"/")(Ubound(split(strDir,"/"))-1) & "/"
strDir=left(strDir,instr(lcase(strDir),"/"&Lcase(strAdminDir)))
Action=Trim(request("Action"))
Header
%>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
<tr>
<td height="22" colspan="2" align="center" class="title"><a name="Top" id="Top"></a><strong>网 站 配 置</strong></td>
</tr>
<tr class="tdbg" onMouseOut="this.className='tdbg'" onMouseOver="this.className='tdbg2'">
<td width="70" height="30"><strong>管理导航：</strong></td>
<td height="30"><a href="#SiteInfo">网站信息配置</a> | <a href="#SiteOption">网站选项配置</a> | <a href="#User">用户选项</a>
| <a href="#Email">邮件服务器选项</a> | <a href="#UpLoad">上传文件选项</a><%if SysTemVersion>2 then%> | <a href="#Product">商城综合设置</a><%end if%> | <a href="#Other">网站其他设置</a> | <a href="#DownloadUnion">下载联盟设置</a></td>
</tr>
</table>
<br />
<%
if Action="SaveConfig" then
call SaveConfig()
else
call ShowConfig()
end if
Footer
Sub ShowConfig()
On Error Resume next
%>
<form method="post" action="Admin_Setup.asp" id="theform" name="theform">
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
<tr>
<td height="22" colspan="2" class="title"> <a name="SiteInfo" id="SiteInfo"></a><strong> 网站信息配置 </strong><a href="#Top"><font color="white">（顶 部）</font></a></td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>网站 名称：</strong></td>
<td width="75%" height="25">
<input name="Web_Info(0)" type="text" id="Web_Info(0)" value="<%=Cl.Web_Info(0)%>" size="50" />
</td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>网站 标题：</strong></td>
<td width="75%" height="25">
<input name="Web_Info(1)" type="text" id="Web_Info(1)" value="<%=Cl.Web_Info(1)%>" size="50" />
</td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>网站关键字：</strong></td>
<td width="75%" height="25">
<input name="Web_Info(2)" type="text" id="Web_Info(2)" value="<%=Cl.Web_Info(2)%>" size="80" />
<br /><font color="#3370CC">将被搜索引擎用来搜索您网站的关键内容每个关键字用“|”号分隔</font> </td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>网站 描述：</strong></td>
<td width="75%" height="25">
<textarea name="Web_Info(3)" cols="41" rows="4" id="Web_Info(3)"><%=Cl.Web_Info(3)%></textarea>
<a href="javascript:admin_Size(-5,'Web_Info(3)')"><img src="images/minus.gif" unselectable="on" border='0' /></a> <a href="javascript:admin_Size(5,'Web_Info(3)')"><img src="images/plus.gif" unselectable="on" border='0' /></a><br />
<font color="#3370CC">将被搜索引擎用来说明您网站的主要内容</font> </td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>网站 地址：</strong></td>
<td width="75%" height="25">
<input name="Web_Info(4)" type="text" id="Web_Info(4)" value="<%=Cl.Web_Info(4)%>" size="80" maxlength="255" />
<br /><font color="#3370CC">请添写完整URL地址</font> </td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>LOGO 地址：</strong></td>
<td width="75%" height="25">
<input name="Web_Info(5)" type="text" id="Web_Info(5)" value="<%=Cl.Web_Info(5)%>" size="80" maxlength="255" />
<br /><font color="#3370CC">请添写完整URL地址</font> </td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>Banner地址：</strong></td>
<td width="75%" height="25">
<input name="Web_Info(6)" type="text" id="Web_Info(6)" value="<%=Cl.Web_Info(6)%>" size="80" maxlength="255" />
<br /><font color="#3370CC">请添写完整URL地址。若为空，则在Banner处显示广告管理中预设的广告。</font> </td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>站长 姓名：</strong></td>
<td width="75%" height="25">
<input name="Web_Info(7)" type="text" id="Web_Info(7)" value="<%=Cl.Web_Info(7)%>" size="20" maxlength="20" />
<strong>邮箱：</strong><input name="Web_Info(8)" type="text" id="Web_Info(8)" value="<%=Cl.Web_Info(8)%>" size="25" maxlength="100" />
</td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>网站版权信息：</strong></td>
<td width="75%" height="25">
<textarea name="Web_Info(9)" cols="41" rows="4" id="Web_Info(9)"><%=Cl.Web_Info(9)%></textarea>
<a href="javascript:admin_Size(-5,'Web_Info(9)')"><img src="images/minus.gif" unselectable="on" border='0' /></a> <a href="javascript:admin_Size(5,'Web_Info(9)')"><img src="images/plus.gif" unselectable="on" border='0' /></a><br />
<font color="#3370CC">显示于网站底部的版权信息，支持HTML语法。</font> </td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><font color="red"><strong>网站安装目录：</strong></font></td>
<td width="75%" height="25">
<input name="Web_Info(10)" type="text" id="Web_Info(10)" value="<%=strDir%>" size="50" maxlength="20" disabled="disabled" />
<br /><font color="red">系统安装目录（相对于根目录的位置），系统会自动获得正确的路径，只需保存设置即可。</font> </td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><font color="blue"><strong>网站管理目录：</strong></font></td>
<td width="75%" height="25">
<input name="Web_Info(14)" type="text" id="Web_Info(14)" value="<%=Cl.Web_Info(14)%>" size="50" maxlength="20" />
<br /><font color="#3370CC">系统安装目录（相对于根目录的位置），后面请带“/”<br />
当前系统管理目录为“<font color="#ff0000"><%=strAdminDir%></font>”，若修改后，请用手动将管理目录“<font color="#ff0000"><%=strAdminDir%></font>”重命名。</font>
</td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>网站当前状态：</strong></td>
<td height="25">
<input type="radio" name="Web_Info(11)" value="Open" <%if Cl.Web_Info(11)="Open" then response.write "checked"%>>
打开
<input type="radio" name="Web_Info(11)" value="Close" <%if Cl.Web_Info(11)="Close" then response.write "checked"%>>
关闭 <font color="#3370CC">维护期间可设置关闭网站</font></td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>关闭网站原因：</strong></td>
<td width="75%" height="25">
<textarea name="Web_Info(12)" cols="41" rows="4" id="Web_Info(12)"><%=Cl.Web_Info(12)%></textarea>
<a href="javascript:admin_Size(-5,'Web_Info(12)')"><img src="images/minus.gif" unselectable="on" border='0' /></a> <a href="javascript:admin_Size(5,'Web_Info(12)')"><img src="images/plus.gif" unselectable="on" border='0' /></a><br />
<font color="#3370CC">在网站关闭情况下显示，支持html语法</font> </td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>FSO组件的名称：</strong></td>
<td><input name="Web_Info(13)" type="text" id="Web_Info(13)" value="<%=Cl.Web_Info(13)%>" size="50" maxlength="50" />
<br /><font color="#3370CC">如果你的网站将FSO(FileSystemObject)组件的名称进行了更改，请在此输入更改过的名称。</font></td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>使用HTML生成：</strong></td>
<td height="25">
<input type="radio" name="Web_Info(15)" value="1" <%if Cl.Web_Info(15) = "1" then response.write "checked"%> />
生成Html
<input type="radio" name="Web_Info(15)" value="0" <%if Cl.Web_Info(15)="0" then response.write "checked"%> />
不生成Html<br /><font color="#3370CC">HTML生成总开关，要开启生成HTML功能服务器需支持FSO。</font></td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>HTML存放目录：</strong></td>
<td><input name="Web_Info(16)" type="text" id="Web_Info(16)" value="<%=Cl.Web_Info(16)%>" size="50" maxlength="50" />
<br /><font color="#3370CC">相对于根目录，开启HTML功能生效，后面请带“/”，若修改后，请用手动将存放目录“<%=Cl.Web_Info(16)%>”重命名。</font></td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>首页定时生成：</strong></td>
<td><%
For i = 0 to 23
%>
<input type="checkbox" name="Web_Info(17)" value="<%=i%>" <%If InStr(","&Cl.Web_Info(17)&",",","&i&",")>0 Then %>checked<%End If%>><%=i%>点
<%
If i<10 Then Response.Write " "
If (i+1) mod 6 = 0 Then
Response.Write "<br>"
Else
Response.Write " "
End if
Next
%>
<font color="#3370CC">定时生成首页HTML，开启HTML功能生效。</font></td>
</tr>
</table>
<br />
<table border="0" cellspacing="1" cellpadding="0" align="center" class="Border">
<tr>
<td height="25" colspan="2" class="title"><a name="SitePACK" id="SitePACK"></a><strong> 创力官方通讯设置 </strong><a href="#Top"><font color="white">（顶 部）</font></a></td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>官方自动通讯系统：</strong></td>
<td>
<input type="radio" name="Web_Pack(0)" value="1" <%if cint(Cl.Web_Pack(0))=1 then%>checked<%end if%> />
开启
<input type="radio" name="Web_Pack(0)" value="0" <%if cint(Cl.Web_Pack(0))=0 then%>checked<%end if%> />
关闭
<font color="#3370CC">开启后可在网站后台收到官方最新通知（建议开启）</font></td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>通讯用户名与密码：</strong></td>
<td>
用户名：
<input type="text" size="21" name="Web_Pack(1)" value="<%=Cl.Web_Pack(1)%>" maxlength="50" />
通讯密码：
<input type="text" size="21" name="Web_Pack(2)" value="<%=Cl.Web_Pack(2)%>" maxlength="20" />
<br /><font color="#3370CC">用户名和密码请到</font> <a href="http://bbs.aspoo.cn/Reg.asp" target="_blank"><strong><font color="#3370CC">创力官方</font></strong></a> <font color="#3370CC">获取</font> </td>
</tr>
</table>
<br />
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
<tr>
<td height="25" colspan="2" class="title"><a name="SiteOption" id="SiteOption"></a><strong> 网站选项配置 </strong><a href="#Top"><font color="white">（顶 部）</font></a></td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>页面执行时间：</strong></td>
<td height="25">
<input type="radio" name="Web_Setting(0)" value="Yes" <%if Cl.Web_Setting(0)="Yes" then response.write "checked"%>>
显示
<input type="radio" name="Web_Setting(0)" value="No" <%if Cl.Web_Setting(0)="No" then response.write "checked"%>>
不显示</td>
</tr>
<tr class="tdbg" onmouseout="this.className='tdbg'" onmouseover="this.className='tdbg2'">
<td width="25%" height="25" align="right"><strong>弹出公告窗口：</strong></td>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -