📄 asp_env.asp
字号:
<%@LANGUAGE="JavaScript" CODEPAGE="936"%>
<SCRIPT language="JavaScript" runat="server">
function getEngVerJs(){
return ScriptEngineMajorVersion() +"."+ScriptEngineMinorVersion()+"."+ ScriptEngineBuildVersion() + " ";
}
</SCRIPT>
<SCRIPT language="VBScript" runat="server">
Function getEngVerVBS()
getEngVerVBS=ScriptEngineMajorVersion() &"."&ScriptEngineMinorVersion() &"." & ScriptEngineBuildVersion() & " "
End Function
</SCRIPT>
<%
Response.Expires = 0;
Response.Buffer = true;
var tPageStartTime = new Date();
var sObjName = Request.Form("sObjName");
var sServerName = Request.ServerVariables("SERVER_NAME")(1);
var sServerAddr = Request.ServerVariables("LOCAL_ADDR")(1);
var sTheFile = Request.ServerVariables("URL")(1);
var arrObj = new Array(
Array( "MSWC.AdRotator", "", 1 ),
Array( "MSWC.BrowserType", "", 1 ),
Array( "MSWC.NextLink", "", 1 ),
Array( "MSWC.Tools", "", 1 ),
Array( "MSWC.Status", "", 1 ),
Array( "MSWC.Counters", "", 1 ),
Array( "IISSample.ContentRotator", "", 1 ),
Array( "IISSample.PageCounter", "", 1 ),
Array( "MSWC.PermissionChecker", "", 1 ),
Array( "WScript.Shell", "", 1 ),
Array( "Scripting.FileSystemObject", "", 1 ),
Array( "ADODB.Connection", "ActiveX Data Object [ADO]", 1 ),
Array( "CDONTS.NewMail", "Collaboration Data Object [CDO]", 1 ),
Array( "SoftArtisans.FileUp", "SA-FileUp 文件上传", 2 ),
Array( "SoftArtisans.FileManager", "SA-FM 文件管理", 2 ),
Array( "LyfUpload.UploadFile", "LyfUpload 文件上传", 2 ),
Array( "Persits.Upload.1", "ASPUpload 文件上传", 2 ),
Array( "w3.upload", "w3 upload 文件上传", 2 ),
Array( "iismail.iismail.1", "IISemail", 3 ),
Array( "JMail.SMTPMail", "w3 Jmail", 3 ),
Array( "Persits.MailSender", "ASPemail", 3 ),
Array( "SMTPsvg.Mailer", "ASPmail", 3 ),
Array( "dkQmail.Qmail", "dkQmail", 3 ),
Array( "SmtpMail.SmtpMail.1", "SMTPmail", 3 ),
Array( "Geocel.Mailer", "Geocel", 3),
Array( "SoftArtisans.ImageGen", "SA 的图像读写组件", 4),
Array( "W3Image.Image", "Dimac 的图像读写组件", 4)
);
if(sObjName.Count>0) arrObj[arrObj.length] = Array( sObjName(1), "", 99 );
function getObjVer(objName){
try{ var objTest = Server.CreateObject(objName);}
catch(e){ if(e.number==-2147221005) return "N/A"; }
try{ var sObjVer = objTest.Version; }
catch(e){ return ""; }
if(isNaN(parseInt(sObjVer))) return "";
objTest = null;
return sObjVer;
}
%>
<html>
<head>
<title>COCOON ASP 探针</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Expires" CONTENT="0">
<meta http-equiv="Cache-Control" CONTENT="no-cache">
<meta http-equiv="Pragma" CONTENT="no-cache">
<STYLE type=text/css>
body,tr { FONT-SIZE: 9pt; FONT-FAMILY: "Arial", "Helvetica", "sans-serif" }
a { COLOR: #000000; TEXT-DECORATION: none }
a:hover { COLOR: #ff0000; TEXT-DECORATION: none }
a.td1o2{ border:3px #333 double; padding-left:5px; padding-right:5px; }
a.td2o2{ border:3px #333 double; padding-left:5px; padding-right: 5px; }
.tbl1 { BORDER-RIGHT: #3f5294 1px solid; BORDER-TOP: #3f5294 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #3f5294 1px solid; BORDER-BOTTOM: #3f5294 1px solid }
.td1 { BORDER-RIGHT: #ffffff 0px solid; BORDER-TOP: #ffffff 1px solid; BORDER-LEFT: #ffffff 1px solid; COLOR: #5c72ba; BORDER-BOTTOM: #ffffff 0px solid; BACKGROUND-COLOR: #abb6dc}
.tbl1o1 { BACKGROUND-COLOR: #8595cb }
.td1o1 { BORDER-RIGHT: #ffffff 0px solid; BORDER-TOP: #ffffff 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #ffffff 0px solid; BACKGROUND-COLOR: #e2e7f3}
.tr1 { BACKGROUND-COLOR: #5c72ba }
.td1o2 { BACKGROUND-COLOR: #f3f4fa }
.tbl2 { BORDER: #50A0A0 1px solid; FONT-SIZE: 9pt; }
.td2 { BORDER-RIGHT: #50A0A0 0px solid; BORDER-TOP: #ffffff 1px solid; BORDER-LEFT: #ffffff 1px solid; COLOR: #308080; BORDER-BOTTOM: #ffffff 0px solid; BACKGROUND-COLOR: #ADCDC2 }
.tbl2o1 { BACKGROUND-COLOR: #50A0A0 }
.td2o1 { BORDER-RIGHT: #ffffff 0px solid; BORDER-TOP: #ffffff 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-BOTTOM: #ffffff 0px solid; BACKGROUND-COLOR: #CDEDE2;}
.tr2 { BACKGROUND-COLOR: #50A0A0 }
.td2o2 { BACKGROUND-COLOR: #DDFDF2 }
.PicBar { background-color: #336699; border: 1px solid #000000; height: 12px;}
</STYLE>
<SCRIPT language="JavaScript">
function getEngVerJs(){
return ScriptEngineMajorVersion() +"."+ScriptEngineMinorVersion()+"."+ ScriptEngineBuildVersion() + " ";
}
</SCRIPT>
<SCRIPT language="VBScript">
Function getEngVerVBS()
getEngVerVBS=ScriptEngineMajorVersion() &"."&ScriptEngineMinorVersion() &"." & ScriptEngineBuildVersion() & " "
End Function
</SCRIPT>
<SCRIPT language="JavaScript">
function getObjByID(n) {
//This function was re-written form DreamWeaver v4.01 by Sunrise_Chen.
var p,i,x;
var d=document;
if(!(x=d[n])&&d.all) x=d.all[n];
for(i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=getObjByID(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n);
return x;
}
function getBrower(){
var re = /(Netscape|Opera|NetCaptor|MSN |MSIE|MyIE|Mozilla\/)([^;|\(|\)|$]+)/gim
var arr, arrResult
while((arr=re.exec(arguments[0]))!=null){arrResult=arr};
if(arrResult) return arrResult[0];
return navigator.appName;
}
function getOS(){
var re = /(Windows|Mac|unix|Linux|SunOS|BSD)([^;|\(|\)]+)/gim
var arr, arrResult
while((arr=re.exec(arguments[0]))!=null){arrResult=arr};
if(arrResult) return arrResult[0];
return navigator.platform;}
function getMSN(){
var sReturnVal,sCurrStat,iInStr;
if(arguments.length<1) return "Unknow";
sCurrStat = arguments[0];
iInStr = sCurrStat.indexOf("MSN ")
if(iInStr>0) sReturnVal = sCurrStat.substr(iInStr,sCurrStat.indexOf(";",iInStr)-iInStr);
else sReturnVal = "no MSN";
return sReturnVal;
}
function getDotNet(){
var sReturnVal,sCurrStat,iInStr,iInStr1;
if(arguments.length<1) return "Unknow";
sCurrStat = arguments[0];
iInStr = sCurrStat.indexOf(".NET ");
iInStr1 = sCurrStat.indexOf(";",iInStr+1);
if(iInStr1<0) iInStr1 = sCurrStat.indexOf(")",iInStr);
if(iInStr>0) sReturnVal = sCurrStat.substr(iInStr,iInStr1-iInStr);
else sReturnVal = "no .NET CLR";
return sReturnVal;
}
function plugNS(sObjName){
var np=navigator.plugins;
for(var i=0;i<np.length;i++)
if(np[i].name.indexOf(sObjName)>-1)
return true;
return false;
}
function plugIE(sObjID){
if(!document.body) document.write('<body>');
document.body.addBehavior("#default#clientcaps");
if(document.body.isComponentInstalled("{"+sObjID+"}","componentid"))
return true;
return false;
}
function plugVerIE(sObjID){
try{return document.body.getComponentVersion("{"+sObjID+"}","componentid");}
catch(e){return "unknow";}
}
function checkPlug(plugName,plugID,n){
var aClientComponent = new Array();
if(isNescape){ //Netscape
aClientComponent[0] = Array(plugName,"",(plugNS(plugName)?"√":"×"),2);
}else{ //IE
if(plugID) aClientComponent[0] = Array(plugName,plugID,(plugIE(plugID)?"√ ( "+plugVerIE(plugID)+" )":"×"),2);
}
addRow("tblClientComponent",aClientComponent,2);
}
function addRow(tblName,arrName,n){
var newRow,newCell;
var oTbl = getObjByID(tblName);
if(!oTbl) return false;
if(!arrName||arrName.length<1) return false;
for(var i=0;i<arrName.length;i++){
newRow = oTbl.insertRow(oTbl.rows.length>1?oTbl.rows.length-1:1);
if(arrName[i].length<2) continue;
newCell = newRow.insertCell(0);
newCell.className = "td"+n+"o1";
newCell.innerHTML = " "+arrName[i][0]+(arrName[i][1]?" <font color='#666666' style='font-size=9px'>[ "+arrName[i][1]+" ]</font>":"");
newCell = newRow.insertCell(1);
newCell.className = "td"+n+"o2";
newCell.align = "center";
newCell.innerHTML = arrName[i][2];
}
}
var aPlug=new Array();
var bJavaScript=bVBScript=false;
var userAgent = navigator.userAgent;
var aClientInfo = new Array();
var aServerEnv = new Array();
var oDiv;
var isNescape = (navigator.appName.indexOf("Netscape")>-1?true:false);
function pageInit(){
//定义客户端组件数组
aPlug = Array(
Array("Internet Explorer","89820200-ECBD-11CF-8B85-00AA005B4383"),
Array("Outlook Express","44BBA840-CC51-11CF-AAFA-00AA00B6015C"),
Array("Offline Browsing Pack","3AF36230-A269-11D1-B5BF-0000F8051515"),
Array("Microsoft virtual machine","08B0E5C0-4FCB-11CF-AAA5-00401C608500"),
Array("Shockwave Flash","D27CDB6E-AE6D-11CF-96B8-444553540000"),
Array("Shockwave for Director","2A202491-F00D-11CF-87CC-0020AFEECF20"),
Array("RealPlayer","23064720-C4F8-11D1-994D-00C04F98BBC9"),
Array("Windows Media Player","22D6F312-B0F6-11D0-94AB-0080C74C7E95"),
Array("QuickTime",""),
Array("VivoActive",""),
Array("LiveAudio",""),
Array("VRML","90A7533D-88FE-11D0-9DBE-0000C0411FC3"),
Array("Vector Graphics Rendering(VML)","10072CEC-8CC1-11D1-986E-00A0C955B42F"),
Array("Dynamic HTML Binding","9381D8F2-0288-11D0-9501-00AA00B911A5")
);
//初始化客户端基本信息数组
aClientInfo = Array(
Array("JavaApplet","",(navigator.javaEnabled()?"√":"×"),1),
Array("客户端地址","Client Address",'<%=Request.ServerVariables("REMOTE_ADDR")%>',1),
Array("客户端端口号","Client Port",'<%=Request.ServerVariables("REMOTE_PORT")%>',1),
Array("CPU类型","CPU Class",navigator.cpuClass,1),
Array("操作系统","Operating System",getOS(userAgent),1),
Array("语言","System Language",(navigator.language?navigator.language:navigator.browserLanguage),1),
Array("浏览器","Browser",getBrower(userAgent),1),
Array("浏览器全称","Browser Name",navigator.appName,1),
Array("浏览器代码","Browser Code",navigator.appCodeName+" "+parseFloat(navigator.appVersion),1),
Array("修正版本","Browser Minor Version",navigator.appMinorVersion,1),
Array("MSN Broswer","",getMSN(userAgent),1),
Array(".NET CLR","",getDotNet(userAgent),1),
Array("JavaScript","JavaScript Support",(bJavaScript ? "√ ( " +getEngVerJs() +" )" :"×"),1),
Array("VBScript","Visual Basic Scripting Support",(bVBScript ? "√ ( " +getEngVerVBS() + " )" :"×"),1),
Array("Cookies","",(navigator.cookieEnabled?"√":"×"),1)
);
//添加客户端组件信息
for(var i=0;i<aPlug.length;i++)
checkPlug(aPlug[i][0],aPlug[i][1],1);
//添加客户端基本信息
addRow("tblClientInfo",aClientInfo,2);
if(!getObjByID("chkAspSupport")){
document.title = CCNS_program + " v" + CCNS_version ;
oDiv = getObjByID("divServer");
if(oDiv){
oDiv.style.display="none";
oDiv.id="DisabledDiv";
}
oDiv = getObjByID("divNoASP");
if(oDiv){
oDiv.style.display="";
oDiv.id="divServer";
}
}
if(oDiv=getObjByID("divStatus")) oDiv.innerHTML = '';
}
function showInfo(iParam){
var oServer = getObjByID("divServer");
var oClient = getObjByID("divClient");
var oFlag = getObjByID("divFlag");
if(!oServer||!oClient) return false;
if(iParam==1){
oFlag.className="tr2"
oFlag.innerText="C"
oServer.style.display="none";
oClient.style.display="";
}else{
oFlag.className="tr1"
oFlag.innerText="S"
oServer.style.display="";
oClient.style.display="none";
}
}
function runTest(o){
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -