⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 env.aspx

📁 程序设计:Flyangel 用到了vb.net c# asp.net xml等 最大特别是核心功能组件化. 特色: 强大的后台管理功能 支持二级分类 支持匿名投稿 超强用户权限设置
💻 ASPX
字号:
🔍 
<%@ Page Language="C#" %>
<% @ Import Namespace="System.Text" %>
<script runat="server">
public void Page_Load(Object sender,EventArgs e)
{
        Response.Expires = 0;
        Response.CacheControl = "no-cache";

   if (!Page.IsPostBack)
   {
     DateTime nowtime=DateTime.Now;
     SERVER_NAME.Text=Request.ServerVariables["SERVER_NAME"];
     MachineName.Text=Server.MachineName;
     LOCAL_ADDR.Text=Request.ServerVariables["LOCAL_ADDR"];
     SERVER_PORT.Text=Request.ServerVariables["SERVER_PORT"];
     ServerDateTime.Text= DateTime.Now.ToString();
     SERVER_SOFTWARE.Text=Request.ServerVariables["SERVER_SOFTWARE"];
     ScriptTimeout.Text=Server.ScriptTimeout.ToString();
     APPL_PHYSICAL_PATH.Text=Request.ServerVariables["APPL_PHYSICAL_PATH"];

     char[] de = {';'};
     string allhttp=Request.ServerVariables["HTTP_USER_AGENT"].ToString();
     string[] myFilename = allhttp.Split(de);
     runtime.Text=myFilename[myFilename.Length-1].Replace(")"," ");
     OS.Text=myFilename[2];
     ServerView.Text=myFilename[1];
     PATH_TRANSLATED.Text=Request.ServerVariables["PATH_TRANSLATED"];

     if (checkobj("ADODB.RecordSet")){
        access.Text="已安装";
     }
     else {
        access.Text="未安装";
     }

     if (checkobj("Scripting.FileSystemObject")){
        fso.Text="已安装";
     }
     else {
        fso.Text="未安装";
     }
     
     if (checkobj("CDONTS.NewMail")){
        sendmail.Text="已安装";
     }
     else {
        sendmail.Text="未安装";
     }

    if (checkobj("JMail.SMTPMail")){
        jmail.Text="已安装";
     }
     else {
        jmail.Text="未安装";
     }

     if (checkobj("LyfUpload.UploadFile")){
        lyupload.Text="已安装";
     }
     else {
        lyupload.Text="未安装";
     }

     if (checkobj("Persits.Upload")){
        aspupload.Text="已安装";
     }
     else {
        aspupload.Text="未安装";
     }
     
     if (checkobj("Persits.MailSender")){
        aspemail.Text="已安装";
     }
     else {
        aspemail.Text="未安装";
     }

     if (checkobj("aspcn.Upload")){
        aspcn.Text="已安装";
     }
     else {
        aspcn.Text="未安装";
     }
     
     sessioncount.Text=Session.Contents.Count.ToString();
     appcount.Text=Application.Contents.Count.ToString();

     DateTime passtime=DateTime.Now;

     fast.Text=((passtime-nowtime).TotalMilliseconds).ToString();
   } 
}

bool checkobj(string obj)
{
     try {
        object meobj = Server.CreateObject(obj);
        return(true);
     }
     catch (Exception objex) 
     {
        return(false);
     }
}

public void checkinput(Object sender,EventArgs e)
{
     try {
        string obj =other.Text;
	object meobj = Server.CreateObject(obj);
        checkok.Text="检测结果："+obj+" 组件存在";
     }
     catch (Exception objex) 
     {
        checkok.Text="检测结果："+other.Text+" 组件不存在";
     }
}

</script>
<html>
	<head>
		<title>[互动.NET]ASP.NET探针1.0</title>
		<meta http-equiv="Content-Type" content="text/html;charset=gb2312">
		<style>
			<!--
A       { COLOR: #000000;    FONT-FAMILY: 宋体;    TEXT-DECORATION: none}
A:hover { COLOR: green;    FONT-FAMILY: 宋体;    TEXT-DECORATION: underline}
.A2       { COLOR: green;    FONT-FAMILY: 宋体;    TEXT-DECORATION: none}
.A2:hover { COLOR: #000000;    FONT-FAMILY: 宋体;    TEXT-DECORATION: underline}
body    { font-family: 宋体; font-size: 9pt}
td      { font-family: 宋体; font-size: 9pt}
.input  { BACKGROUND-COLOR: #ffffff;BORDER:#3F8805 1px solid;FONT-SIZE: 9pt}
.backc  { BACKGROUND-COLOR: #3F8805;BORDER:#3F8805 1px solid;FONT-SIZE: 9pt;color:white}
--></style>
	</head>
	<body bgcolor="#EAEAEA" text="#000000">
		<div align="center"><font color="#FF0000">[.NET服务器常用参数]</font><br>
			<br>
		</div>
		<table width="46%" height="186" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#000000">
			<tr>
				<td>
					<table width="461" height="255" border="0" cellpadding="0" cellspacing="1">
						<tr bgcolor="#99CC00" height="18">
							<td width="146" align="left">&nbsp;服务器名称：</td>
							<td width="329" height="18">&nbsp;
								<asp:label id="MachineName" runat="server" /></td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;服务器IP地址：</td>
							<td height="18">&nbsp;
								<asp:label id="LOCAL_ADDR" runat="server" /></td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;服务器域名：</td>
							<td height="18">&nbsp;
								<asp:label id="SERVER_NAME" runat="server" />
							</td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;HTTP访问端口：</td>
							<td height="18">&nbsp;
								<asp:label id="SERVER_PORT" runat="server" />
							</td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;服务器本机时间：</td>
							<td height="18">&nbsp;
								<asp:label id="ServerDateTime" runat="server" /></td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;服务器IIS版本：</td>
							<td height="18">&nbsp;
								<asp:label id="SERVER_SOFTWARE" runat="server" /></td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;服务端脚本执行超时：</td>
							<td height="18">&nbsp;
								<asp:label id="ScriptTimeout" runat="server" />
								秒</td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;虚拟目录绝对路径：</td>
							<td height="18">&nbsp;
								<asp:label id="APPL_PHYSICAL_PATH" runat="server" /></td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;执行文件绝对路径：</td>
							<td height="18">&nbsp;
								<asp:label id="PATH_TRANSLATED" runat="server" /></td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;服务器浏览器版本：</td>
							<td height="18">&nbsp;
								<asp:label id="ServerView" runat="server" /></td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;.NET解释引擎版本：</td>
							<td height="18">&nbsp;
								<asp:label id="runtime" runat="server" /></td>
						</tr>
						<tr bgcolor="#99CC00" height="18">
							<td align="left">&nbsp;服务器操作系统：</td>
							<td height="18">&nbsp;
								<asp:label ID="OS" runat="server" /></td>
						</tr>
					</table>
				</td>
			</tr>
		</table>
		<div align="center"><font color="#FF0000"><br>
				[.NET服务器常用组件]<br>
				<br>
			</font>
		</div>
		<table width="46%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#000000">
			<tr>
				<td>
					<table width="461" height="229" border="0" cellpadding="0" cellspacing="1">
						<form runat="server">
							<tr bgcolor="#99CC00" height="18">
								<td width="146" height="18" align="left">&nbsp;Access数据库组件：</td>
								<td width="312" height="18">&nbsp;
									<asp:label id="access" runat="server" /></td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;FSO文件操作组件：</td>
								<td height="18">&nbsp;
									<asp:label id="fso" runat="server" />
								</td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;CDONTS邮件发送组件：</td>
								<td height="18">&nbsp;
									<asp:label id="sendmail" runat="server" /></td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;JMAIL邮件发送组件：</td>
								<td height="18">&nbsp;
									<asp:label id="jmail" runat="server" /></td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;ASPEmail邮件发送组件：</td>
								<td height="18">&nbsp;
									<asp:label id="aspemail" runat="server" /></td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;LyfUpload上传组件：</td>
								<td height="18">&nbsp;
									<asp:label id="lyupload" runat="server" /></td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;ASPUpload上传组件：</td>
								<td height="18">&nbsp;
									<asp:label id="aspupload" runat="server" /></td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;ASPCN上传组件：</td>
								<td height="18">&nbsp;
									<asp:label id="aspcn" runat="server" /></td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;其他组件安装检测：</td>
								<td height="18">&nbsp;
									<asp:TextBox id="other" OnTextChanged="checkinput" cssclass="input" runat="server" />
									<asp:button id="submit" text="检 测" cssclass="input" runat="server" /></td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" colspan="2" align="center">
									<font color="#FF0000">
										<asp:label ID="checkok" runat="server" /></font></td>
							</tr>
						</form>
					</table>
				</td>
			</tr>
		</table>
		<div align="center"><font color="#FF0000"><br>
				[当前虚拟目录资源状况]</font>
			<br>
			<br>
			<table width="46%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#000000">
				<tr>
					<td>
						<table width="461" height="29" border="0" cellpadding="0" cellspacing="1">
							<tr bgcolor="#99CC00" height="18">
								<td width="158" height="18" align="left">&nbsp;虚拟目录Session总数：</td>
								<td width="300" height="18">&nbsp;
									<asp:label id="sessioncount" runat="server" />
									个</td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" align="left">&nbsp;虚拟目录Application总数：</td>
								<td height="18">&nbsp;
									<asp:label id="appcount" runat="server" />
									个</td>
							</tr>
						</table>
					</td>
				</tr>
			</table>
			<br>
			<font color="#FF0000">[.NET虚拟主机速度测试]</font>
			<br>
			<br>
			<table width="46%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#000000">
				<tr>
					<td>
						<table width="461" height="29" border="0" cellpadding="0" cellspacing="1">
							<tr bgcolor="#99CC00" height="18">
								<td width="158" height="18" align="left">&nbsp;执行本页.NET代码时间：</td>
								<td width="300" height="18">&nbsp; <font color="#FF0000">
										<asp:label id="fast" runat="server" />
									</font>毫秒</td>
							</tr>
							<tr bgcolor="#99CC00" height="18">
								<td height="18" colspan="2" align="left"><br>
									*以下是在各ASP.NET空间探针测试的速度，仅作参考，各位请以实测作准。<br>
									<br>
									[<a href="http://aspx.chinagz.net" target="_blank">互动.NET</a>] 第一次运行速度：240.3456 
									毫秒 平均运行速度：20.55 毫秒<br>
									<br>
									[<a href="http://www.aspx.net.cn" target="_blank">先锋科技免费空间</a>] 第一次运行速度：328.125 
									毫秒 平均运行速度：31.25 毫秒<br>
									<br>
									[<a href="http://www.brinkster.com" target="_blank">brinkster免费空间</a>] 
									第一次运行速度：609.14 毫秒 平均运行速度：50.62 毫秒<br>
									<br>
								</td>
							</tr>
						</table>
					</td>
				</tr>
			</table>
			<br>
			&copy;版权所有2002 <a href="http://aspx.chinagz.net">互动.NET</a> 探针制作：<a href="mailto:webmaster@chinagz.net">小宝.NET</a>
			QQ：3538150 MSN:webmaster@chinagz.net<br>
		</div>
	</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -