明輝手游網(wǎng)中心：是一個免費(fèi)提供流行視頻軟件教程、在線學(xué)習(xí)分享的學(xué)習(xí)平臺！

如何用asp來判斷客戶端瀏覽器與設(shè)置系統(tǒng)的分類。

發(fā)表時(shí)間：2024-01-15 來源：明輝站整理相關(guān)軟件相關(guān)文章人氣：

[摘要]很多人都在問這個問題阿，下面就是答案了：）-----------------------------------------首先她要用到asp的ServerVarialbles這個集合。在ServerVarialbles有這樣一項(xiàng)HTTP_USER_AGENT,他有什么作用呢？他的作用就是獲取客戶...

很多人都在問這個問題阿，下面就是答案了：）
-----------------------------------------
首先她要用到asp的ServerVarialbles這個集合。在ServerVarialbles有這樣一項(xiàng)HTTP_USER_AGENT,他有什么作用呢？他的作用就是獲取客戶端瀏覽器的基本信息和操作系統(tǒng)的版本阿，如是什么牌子的瀏覽器阿(一般就是IE和netscape了)，他們的版本號什么的，下面我用一個程序來說明她的用法,文件命名為CheckBrowse.asp。
$U2 Forum rautinee原創(chuàng)$
$http://u2bbs.126.com$
'++++++++++++++以下是程序的正文+++++++++++++++++
<HTML>
<HEAD>
<TITLE> 瀏覽器檢測 </TITLE>
</HEAD>
<BODY>
<%
Dim BrowseMsg,BrowseVersion,SystemVersion
BrowseMsg=Request.ServerVariables("HTTP_USER_AGENT")
'+++++++++++一個基本判別操作系統(tǒng)的函數(shù)+++++++++++
Function SystemCheck()
if inStr(BrowseMsg,"Windows 98") then
SystemCheck="Windows 98"
else if inStr(BrowseMsg,"Windows NT 4.0") then
SystemCheck="Windows NT 4.0"
else if inStr(BrowseMsg,"Windows NT 5.0") then
SystemCheck="Windows NT 2000"
else
SystemCheck="未知類型"
end if
end if
end if
end Function
'由于時(shí)間的原因我沒有寫判定win95和windows xp的語句，感興趣的網(wǎng)友可以
'自行添加：)
'+++++++++++結(jié)束+++++++++++
if inStr(BrowseMsg,"MSIE") then
SystemVersion=CInt(Mid(BrowseMsg,inStr(BrowseMsg,"MSIE")+5,1))
response.write "您的瀏覽器的版本是 IE"&BrowseVersion&"<BR>"
response.write "您的操作系統(tǒng)是 "&SystemCheck()
end if
%>
</BODY>
</HTML>
----------------------------------------
ok,enjoy it and good luck!