📄 default.asp
字号:
<!--#include file="../../System/Const.asp"-->
<!--#include file="../../System/misc.asp"-->
<%
if cstr(session("usertype"))<>cstr(UTP_ADMIN) then
Response.Redirect "../../system/relogin.asp?Info=你的身份检查，出现错误！"
end if
set cn=server.CreateObject("ADODB.connection")
cn.Open DSN_ACLASS
set rs=server.CreateObject("ADODB.recordset")
rs.Open "select * from DEFINE where DEF_NAME='SERVER_IP'", cn
server_ip=rs("DEF_VALUE")
rs.close
rs.Open "select * from DEFINE where DEF_NAME='SERVER_PORT'", cn
server_port=rs("DEF_VALUE")
rs.close
rs.Open "select * from DEFINE where DEF_NAME='SERVER_CLASSINFO_IP'", cn
server_classinfo_ip=rs("DEF_VALUE")
rs.close
rs.Open "select * from DEFINE where DEF_NAME='SERVER_CLASSINFO_PORT'", cn
server_classinfo_port=rs("DEF_VALUE")
rs.close
rs.Open "select * from DEFINE where DEF_NAME='SERVER_SEND_CLASSINFO'", cn
server_send_classinfo=clng(rs("DEF_VALUE"))
rs.close
rs.Open "select * from DEFINE where DEF_NAME='SERVER_ALLOW_UDP'", cn
server_allow_udp=clng(rs("DEF_VALUE"))
rs.close
rs.Open "select * from DEFINE where DEF_NAME='SMTP_SERVER'", cn
smtp_server=rs("DEF_VALUE")
rs.close
rs.Open "select * from DEFINE where DEF_NAME='SMTP_USERNAME'", cn
smtp_username=rs("DEF_VALUE")
rs.close
rs.Open "select * from DEFINE where DEF_NAME='SMTP_PASSWORD'", cn
smtp_password=rs("DEF_VALUE")
rs.close
rs.Open "select * from DEFINE where DEF_NAME='TIPBOARD_TXT'", cn
tipboard=rs("DEF_VALUE")
rs.close
cn.close
%>
<HTML>
<HEAD>
</HEAD>
<BODY bgcolor="#CDC8CF" leftmargin="0" topmargin="10" >
<!--下面包含头文件-->
<!--#include file="Header.asp"-->
<!--下面包含显示所有用户的列表-->
<table width="770" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" align="center" height="70%">
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764" bgcolor="#EFEFEF" height="20" valign="bottom"> 你现在的位置：服务器管理
- 参数配置</td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3" height="15"></td>
<td width="764" height="15"> </td>
<td bgcolor="#8C9A8C" width="3" height="15"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764" valign="top">
<form name="form1" method="post" action="edit2.asp">
<table class=unnamed1 border=0 cellspacing="1" cellpadding="5" bgcolor="C1C8C1" align="center" width="583" height="228" >
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1" height="26">服务器地址</td>
<td width="438" class="unnamed1" height="26">
<input alt="服务器地址***" type="text" name="Server_IP" value="<%=server_ip%>" size=50>
*** </td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1" height="18">服务器端口</td>
<td width="438" class="unnamed1" height="18">
<input alt="服务器端口###" type="text" name="Server_PORT" value="<%=server_port%>" size="50">
*** </td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1" height="26">公共信息广播地址</td>
<td width="438" class="unnamed1" height="26">
<input alt="服务器地址..." type="text" name="server_classinfo_ip" value="<%=server_classinfo_ip%>" size=50>
<br>(224.0.0.0 ~ 239.255.255.255)*** </td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1" height="18">公共信息广播端口</td>
<td width="438" class="unnamed1" height="18">
<input alt="服务器端口###" type="text" name="server_classinfo_port" value="<%=server_classinfo_port%>" size="50">
*** </td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1" height="18">广播选项</td>
<td width="438" class="unnamed1" height="18">
<input type="checkbox" name="server_send_classinfo" <%=CHECKED(server_send_classinfo, 1)%> value="1">
定期广播会议室信息
<input type="checkbox" name="server_allow_udp" <%=CHECKED(server_allow_udp, 1)%> value="1">
允许会员端采用TCP/UDP登录</td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1" height="18">邮件通知服务器</td>
<td width="438" class="unnamed1" height="18">
<input alt="" type="text" name="smtp_server" value="<%=smtp_server%>" size="50">
</td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1" height="18">邮件发送帐号</td>
<td width="438" class="unnamed1" height="18">
<input alt="" type="text" name="smtp_username" value="<%=smtp_username%>" size="50">
</td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1" height="18">邮件发送密码</td>
<td width="438" class="unnamed1" height="18">
<input alt="" type="text" name="smtp_password" value="<%=smtp_password%>" size="50">
</td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="122" class="unnamed1">公告栏</td>
<td width="438" class="unnamed1">
<Textarea name="tipboard" cols="49" rows="4" wrap="VIRTUAL"><%=tipboard%></TextArea>
</td>
</tr>
</table>
<p align="center">
<input type="button" value="确 定" onClick="jscript:OnSubmitGeneral(form1)" name="buttonsubmit">
</p>
</form>
</td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3" height="21"></td>
<td width="764" bgcolor="EFEFEF" height="21">
<div align="center"><%=COMPANY%></div>
</td>
<td bgcolor="#8C9A8C" width="3" height="21"></td>
</tr>
</table>
<table width="770" border="0" cellspacing="0" cellpadding="0" bgcolor="#8C9A8C" align="center">
<tr>
<td height="4"></td>
</tr>
</table>
<!--#include file="../../System/miscJScript.asp"-->
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -