📄 sys_config.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%dbdns="../"%>
<!--#include file="chk.asp"-->
<!--#include file="../AppCode/Class/clsSys_SiteConfig.asp"-->
<!--#include file="../AppCode/fun/inc_file.asp"-->
<!--#include file="../AppCode/fun/function.asp"-->
<%
Set SiteConfig = New clsSys_SiteConfig
Select Case Trim(Request.Form("action"))
Case "edit"
Call SiteConfig.Edit()
Call SiteConfig.ToFile()
Call SaveAdminLog("编辑系统设置")
Call CloseConn()
Call ActionOk("Sys_Config.asp")
End Select
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>后台管理系统</title>
<link rel="stylesheet" type="text/css" href="images/Style.css">
</head>
<body>
<!--#include file="top.asp"-->
<br />
<table cellspacing="0" cellpadding="0" width="98%" align="center" border="0">
<tbody>
<tr>
<td style="PADDING-LEFT: 2px; HEIGHT: 22px"
background="images/tab_top_bg.gif"><table cellspacing="0" cellpadding="0" width="477" border="0">
<tbody>
<tr>
<td width="147"><table height="22" cellspacing="0" cellpadding="0" border="0">
<tbody>
<tr>
<td width="3"><img id="tabImgLeft__0" height="22"
src="images/tab_active_left.gif" width="3" /></td>
<td
background="images/tab_active_bg.gif" class="tab"><strong class="mtitle">后台管理系统</strong></td>
<td width="3"><img id="tabImgRight__0" height="22"
src="images/tab_active_right.gif"
width="3" /></td>
</tr>
</tbody>
</table></td>
</tr>
</tbody>
</table></td>
</tr>
<tr>
<td bgcolor="#ffffff"><table cellspacing="0" cellpadding="0" width="100%" border="0">
<tbody>
<tr>
<td width="1" background="images/tab_bg.gif"><img height="1"
src="images/tab_bg.gif" width="1" /></td>
<td
style="PADDING-RIGHT: 10px; PADDING-LEFT: 10px; PADDING-BOTTOM: 10px; PADDING-TOP: 10px"
valign="top"><div id="tabContent__0" style="DISPLAY: block; VISIBILITY: visible">
<table cellspacing="1" cellpadding="1" width="100%" align="center"
bgcolor="#8ccebd" border="0">
<tbody>
<tr>
<td
style="PADDING-RIGHT: 10px; PADDING-LEFT: 10px; PADDING-BOTTOM: 10px; PADDING-TOP: 10px"
valign="top" bgcolor="#fffcf7">
<table width="100%" border="0" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
<form id="form1" name="form1" method="post" action="">
<tr>
<td colspan="2" bgcolor="#EBEBEB">网站运行设置</td>
</tr>
<tr>
<td width="18%" align="right" bgcolor="#FFFFFF">网站关闭</td>
<td width="82%" bgcolor="#FFFFFF"><input name="SiteIsClose" type="checkbox" id="SiteIsClose" value="1" <%If SiteConfig.SiteIsClose="True" Then%>checked="checked"<%End If%> /></td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">网站关闭原因</td>
<td bgcolor="#FFFFFF"><input name="SiteCloseNote" type="text" value="<%=SiteConfig.SiteCloseNote%>" size="50" /></td></tr>
<tr>
<td colspan="2" align="left" bgcolor="#EBEBEB">网站基本设置</td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">网站名称</td>
<td bgcolor="#FFFFFF"><input name="SiteName" type="text" value="<%=SiteConfig.SiteName%>" size="50" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">网站标题</td>
<td bgcolor="#FFFFFF"><input name="SiteTitle" type="text" value="<%=SiteConfig.SiteTitle%>" size="50" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">网站关键字</td>
<td bgcolor="#FFFFFF"><input name="SiteKeyWords" type="text" value="<%=SiteConfig.SiteKeyWords%>" size="50" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">网站描述</td>
<td bgcolor="#FFFFFF"><input name="SiteDescription" type="text" value="<%=SiteConfig.SiteDescription%>" size="50" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">网站网址</td>
<td bgcolor="#FFFFFF"><input name="SiteUrl" type="text" value="<%=SiteConfig.SiteUrl%>" size="50" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF"> TCP/IP备案号</td>
<td bgcolor="#FFFFFF"><input name="SiteTCPIP" type="text" id="SiteTCPIP" value="<%=SiteConfig.SiteTCPIP%>" size="50" /></td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">公司名称</td>
<td bgcolor="#FFFFFF"><input name="SiteCoName" type="text" id="SiteCoName" value="<%=SiteConfig.SiteCoName%>" size="50" /></td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">联系人</td>
<td bgcolor="#FFFFFF"><input name="SiteLinkMan" type="text" id="SiteLinkMan" value="<%=SiteConfig.SiteLinkMan%>" size="20" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">电话</td>
<td bgcolor="#FFFFFF"><input name="SiteTel" type="text" value="<%=SiteConfig.SiteTel%>" size="20" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">传真</td>
<td bgcolor="#FFFFFF"><input name="SiteFax" type="text" value="<%=SiteConfig.SiteFax%>" size="20" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">地址</td>
<td bgcolor="#FFFFFF"><input name="SiteAddress" type="text" value="<%=SiteConfig.SiteAddress%>" size="50" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">邮编</td>
<td bgcolor="#FFFFFF"><input name="SiteZip" type="text" value="<%=SiteConfig.SiteZip%>" size="10" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">邮箱</td>
<td bgcolor="#FFFFFF"><input name="SiteEmail" type="text" value="<%=SiteConfig.SiteEmail%>" size="50" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">QQ</td>
<td bgcolor="#FFFFFF"><input name="SiteQQ" type="text" value="<%=SiteConfig.SiteQQ%>" size="20" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">流量统计代码</td>
<td bgcolor="#FFFFFF"><textarea name="SiteTongji" cols="48" rows="3" id="SiteTongji"><%=SiteConfig.SiteTongji%></textarea></td></tr>
<tr style="display:none">
<td align="right" bgcolor="#FFFFFF">网站所在目录</td>
<td bgcolor="#FFFFFF"><input name="SitePath" type="text" id="SitePath" value="<%=SiteConfig.SitePath%>" size="20" /></td>
</tr>
<tr style="display:none">
<td align="right" bgcolor="#FFFFFF">数据库所在目录</td>
<td bgcolor="#FFFFFF"><input name="SiteDbPath" type="text" id="SiteDbPath" value="<%=SiteConfig.SiteDbPath%>" size="20" /></td>
</tr>
<tr style="display:none">
<td align="right" bgcolor="#FFFFFF">后台地址</td>
<td bgcolor="#FFFFFF"><input name="SiteAdminPath" type="text" value="<%=SiteConfig.SiteAdminPath%>" size="20" /></td></tr>
<tr>
<td colspan="2" align="left" bgcolor="#EBEBEB">邮件服务器设置</td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">发送组件选择 </td>
<td bgcolor="#FFFFFF"><select name="SiteMailSmtpType" id="SiteMailSmtpType">
<option value="">关闭邮件发送功能</option>
<option value="Jmail" <%If SiteConfig.SiteMailSmtpType = "Jmail" Then%>selected="selected"<%End If%>>Jmail</option>
</select> </td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">邮件发送服务器</td>
<td bgcolor="#FFFFFF"><input name="SiteMailSmtpName" type="text" value="<%=SiteConfig.SiteMailSmtpName%>" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">用户名</td>
<td bgcolor="#FFFFFF"><input name="SiteMailSmtpUser" type="text" value="<%=SiteConfig.SiteMailSmtpUser%>" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">密码</td>
<td bgcolor="#FFFFFF"><input name="SiteMailSmtpPass" type="password" value="<%=SiteConfig.SiteMailSmtpPass%>" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">发件人邮箱</td>
<td bgcolor="#FFFFFF"><input name="SiteMailSmtpFromEmail" type="text" value="<%=SiteConfig.SiteMailSmtpFromEmail%>" /></td></tr>
<tr>
<td align="right" bgcolor="#FFFFFF">发件人姓名</td>
<td bgcolor="#FFFFFF"><input name="siteMailSmtpFromUser" type="text" value="<%=SiteConfig.siteMailSmtpFromUser%>" /></td></tr>
<tr>
<td colspan="2" align="left" bgcolor="#EBEBEB">自动生成缩略图设置</td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">缩略图组件</td>
<td bgcolor="#FFFFFF"><select name="PhotoThumbDLL" id="PhotoThumbDLL">
<option value="">关闭自动生成功能</option>
<option value="wsImage"<%If SiteConfig.PhotoThumbDLL = "wsImage" Then%> selected="selected"<%End If%>>wsImage</option>
<option value="aspJpeg"<%If SiteConfig.PhotoThumbDLL = "aspJpeg" Then%> selected="selected"<%End If%>>aspJpeg</option>
</select> </td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">缩略图大小</td>
<td bgcolor="#FFFFFF">宽×高 = <input name="PhotoThumbW" type="text" id="PhotoThumbW" size="3" value="<%=SiteConfig.PhotoThumbW%>" />×<input name="PhotoThumbH" type="text" id="PhotoThumbH" size="3" value="<%=SiteConfig.PhotoThumbH%>" /></td>
</tr>
<tr>
<td colspan="2" align="left" bgcolor="#EBEBEB">支付宝设置</td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">启用支付定</td>
<td bgcolor="#FFFFFF"><input name="Alipay_open" type="checkbox" id="Alipay_open" value="1" <%If SiteConfig.Alipay_open="1" Then%>checked="checked"<%End If%> /></td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">支付宝帐号</td>
<td bgcolor="#FFFFFF"><input name="Alipay_email" type="text" id="Alipay_email" size="50" value="<%=SiteConfig.Alipay_email%>" /></td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">安全校验码</td>
<td bgcolor="#FFFFFF"><input name="Alipay_code" type="text" id="Alipay_code" size="50" value="<%=SiteConfig.Alipay_code%>" /></td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF">合作者身份ID</td>
<td bgcolor="#FFFFFF"><input name="Alipay_partner" type="text" id="Alipay_partner" size="50" value="<%=SiteConfig.Alipay_partner%>" /></td>
</tr>
<tr>
<td align="right" bgcolor="#FFFFFF"></td>
<td bgcolor="#FFFFFF"><input name="action" type="hidden" id="action" value="edit" />
<input type="submit" name="Submit" value="保 存" /></td></tr>
</form>
</table>
</td>
</tr>
</tbody>
</table>
</div></td>
<td width="1" background="images/tab_bg.gif"><img height="1"
src="images/tab_bg.gif" width="1" /></td>
</tr>
</tbody>
</table></td>
</tr>
<tr>
<td background="images/tab_bg.gif" bgcolor="#ffffff"><img height="1"
src="images/tab_bg.gif" width="1" /></td>
</tr>
</tbody>
</table>
</body>
</html>
<%
Call CloseConn()
Set Admin = Nothing
Set SiteConfig = Nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -