程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> 關於ASP編程 >> ASP實例教程:用戶信息和服務器

ASP實例教程:用戶信息和服務器

編輯:關於ASP編程

用戶信息和服務器相關的實例

取得用戶信息

如何查明訪問者的浏覽器類型、IP地址等信息

本示例代碼如下:

<html>
<body>
<p>
<b>您正在通過這款浏覽器訪問我們的站點:</b>
<%Response.Write(Request.ServerVariables("http_user_agent"))%>
</p>
<p>
<b>您的 IP 地址是:</b>
<%Response.Write(Request.ServerVariables("remote_addr"))%>
</p>
<p>
<b>IP 地址的 DNS 查詢是:</b>
<%Response.Write(Request.ServerVariables("remote_host"))%>
</p>
<p>
<b>調用該頁面所用的方法是:</b>
<%Response.Write(Request.ServerVariables("request_method"))%>
</p>
<p>
<b>服務器的域名:</b>
<%Response.Write(Request.ServerVariables("server_name"))%>
</p>
<p>
<b>服務器的端口:</b>
<%Response.Write(Request.ServerVariables("server_port"))%>
</p>
<p>
<b>服務器的軟件:</b>
<%Response.Write(Request.ServerVariables("server_software"))%>
</p>
</body>
</html>

看到本信息說明該文是通過網頁教學(www.webjx.com)整理發布的,請不要刪掉!

本實例運行結果如下:

您正在通過這款浏覽器訪問我們的站點: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; GTB5; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1))
您的 IP 地址是: 121.106.102.120
IP 地址的 DNS 查詢是: 123.106.112.210
調用該頁面所用的方法是: GET
服務器的域名: www.webjx.com
服務器的端口: 80
服務器的軟件: Microsoft-IIS/5.0

取得服務器變量

本例演示如何使用ServerVariables集合取得訪問者的浏覽器類型、IP地址等信息。

本示例代碼如下:

<html>
<body>
<p>
所有可能的服務器變量:
</p>
<%
For Each Item in Request.ServerVariables
      Response.Write(Item & "<br />")
Next
%>
</body>
</html>

本實例運行結果如下:

所有可能的服務器變量:
ALL_HTTP
ALL_RAW
APPL_MD_PATH
APPL_PHYSICAL_PATH
AUTH_PASSWORD
AUTH_TYPE
AUTH_USER
CERT_COOKIE
CERT_FLAGS
CERT_ISSUER
CERT_KEYSIZE
CERT_SECRETKEYSIZE
CERT_SERIALNUMBER
CERT_SERVER_ISSUER
CERT_SERVER_SUBJECT
CERT_SUBJECT
CONTENT_LENGTH
CONTENT_TYPE
GATEWAY_INTERFACE
HTTPS
HTTPS_KEYSIZE
HTTPS_SECRETKEYSIZE
HTTPS_SERVER_ISSUER
HTTPS_SERVER_SUBJECT
INSTANCE_ID
INSTANCE_META_PATH
LOCAL_ADDR
LOGON_USER
PATH_INFO
PATH_TRANSLATED
QUERY_STRING
REMOTE_ADDR
REMOTE_HOST
REMOTE_USER
REQUEST_METHOD
SCRIPT_NAME
SERVER_NAME
SERVER_PORT
SERVER_PORT_SECURE
SERVER_PROTOCOL
SERVER_SOFTWARE
URL
HTTP_ACCEPT
HTTP_ACCEPT_LANGUAGE
HTTP_CONNECTION
HTTP_HOST
HTTP_REFERER
HTTP_USER_AGENT
HTTP_COOKIE
HTTP_UA_CPU
HTTP_ACCEPT_ENCODING

創建welcome cookie

本例演示如何使用Cookies集合創建一個歡迎cookie。

加此信息網頁教學網(www.webjx.com)發布目的是為了防止你變懶!webjx.com不主張采集!

本示例代碼如下:

<%
dim numvisits
response.cookies("NumVisits").Expires=date+365
numvisits=request.cookies("NumVisits")
if numvisits="" then
   response.cookies("NumVisits")=1
   response.write("歡迎!這是您第一次訪問本頁面。")
else
   response.cookies("NumVisits")=numvisits+1
   response.write("之前,您已經訪問過本頁面 ")
   response.write(numvisits & " 次。")
end if
%>
<html>
<body>
</body>
</html>

本實例運行結果如下:

之前,您已經訪問過本頁面 1 次。

探測用戶發送的字節總數

本例演示如何使用TotalBytes屬性來取得用戶在Request對象中發送的字節總數。

本示例代碼如下:

<html>
<body>
<form action="/example/aspe/demo_aspe_totalbytes.asp" method="post">
請鍵入一些字符:
<input type="text" name="txt"><br><br>
<input type="submit" value="提交">
</form>
<%
If Request.Form("txt")<>"" Then
   Response.Write("您提交了:")
   Response.Write(Request.Form)
   Response.Write("<br><br>")
   Response.Write("字節總計:")
   Response.Write(Request.Totalbytes)
End If
%>
</body>
</html>

本實例運行結果出現一個表單,然後自己測試下吧!

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved