ASP獲取當前路徑語句
(2014-06-17 13:41:01)
一、將以下代碼放在一個asp頁面里，保存后在IE里查看運行結果：
---------------------------------------------------------------------------------------------
本文件ip路徑：<%="http://" &
request.servervariables("server_name")&
request.servervariables("script_name")
%>
<br/>
本機ip:<%=request.servervariables("remote_addr")%>
<br/>
服務器名:<%=Request.ServerVariables("SERVER_NAME")%>
<br/>
服務器IP:<%=Request.ServerVariables("LOCAL_ADDR")%>
<br/>
服務器端口:<%=Request.ServerVariables("SERVER_PORT")%>
<br/>
服務器時間:<%=now%>
<br/>
IIS版本:<%=Request.ServerVariables("SERVER_SOFTWARE")%>
<br/>
腳本超時時間:<%=Server.ScriptTimeout%>
<br/>
本文件路徑:<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>
<br/>
服務器CPU數量:<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>
<br/>
服務器解譯引擎:<%=ScriptEngine & "/"&
ScriptEngineMajorVersion
&"."&ScriptEngineMinorVersion&"."&ScriptEngineBuildVersion
%> <br/>
服務器操作系統(tǒng):<%=Request.ServerVariables("OS")%>
<br/>
支持的文件類型：<%=Request.ServerVariables("HTTP_Accept")%>
<br/>
訪問的文件路徑：<%=Request.ServerVariables("HTTP_url")%>
<br/>
用戶代理的信息：<%=Request.ServerVariables("HTTP_USER_AGENT")%>
<br/>
獲取url中的文件名和傳過來的值:request.ServerVariables("script_name")+"?"+request.ServerVariableS("QUERY_STRING")
<br/>
---------------------------------------------------------------------------------------------
運行結果為：
本文件ip路徑：http://localhost/ceshi.asp
本機ip:127.0.0.1
服務器名:localhost
服務器IP:127.0.0.1
服務器端口:8091
服務器時間:2005-7-27 14:28:04
IIS版本:Microsoft-IIS/5.0
腳本超時時間:90
本文件路徑:E:\hospital\ceshi.asp
服務器CPU數量:2
服務器解譯引擎:VBScript/5.6.7426
服務器操作系統(tǒng):Windows_NT
支持的文件類型：image/gif, image/x-xbitmap, image/jpeg, image/pjpeg,
application/vnd.ms-powerpoint, application/vnd.ms-excel,
application/msword, application/x-shockwave-flash,*/*
訪問的文件路徑：/ceshi.asp
用戶代理的信息：Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; Maxthon;
COM+ 1.0.2204)
---------------------------------------------------------------------------------------------
二、如若獲得此文件的目錄可以利用下面的函數：
<%
Public Function ServerPath
Dim Path
Dim Pos
Path="http://" & Request.ServerVariables("server_name") &
Request.ServerVariables("script_name")
Pos=InStrRev(Path,"/")
ServerPath=Left(Path,Pos)
End Function
%>
=====================<br>
所在文件目錄：<%=ServerPath%>
<br>
=====================<br>
運行結果為：
=====================
所在文件目錄：http://localhost/
=====================
-----------------------------------------------------
|
轉載▼
