贴心猫(imcat) v5.4 --- 极轻、极简通用PHP网站系统！
浏览器内核;操作系统;IE插件
基于Trident内核的浏览器 IE 内核 ...在相当大的程度上落后了其它的排版引擎，如Gecko、WebCore、KHTML及Presto。
基于Geckos内核的浏览器 Firefox浏览器
基于Presto内核的浏览器 Opera浏览器
基于Kestrel内核的浏览器 Opera 9.5 之后版本 用Kestrel内核
基于多种内核的浏览器 Google Chrome（WebKit,Mozilla） / QQ浏览器（Trident,Webkit）
基于Webkit内核的浏览器 Apple Safari 浏览器
http://hi.baidu.com/chengchunqian/blog/item/9d15a850d0424c6d853524d9.html
使用Request.Servervariables("HTTP_USER_AGENT")判断客户端系统和浏览器类型以及版本的方法，只要查找以下字符就可以判断了，很简单的。
以下内容全是本人收集的，目前很全，也可自行添加关键词。
使用方法请参阅：
Asp超精准判断客户端浏览器类型：http://lcx.cc/?FoxNews=482.html
Asp超精准判断客户端操作系统类型：http://lcx.cc/?FoxNews=481.html
目前可以判断47种浏览器类型,包括GoogLe,Grub,MSN,Yahoo!的Bot自动搜索系统,和十种常见IE插件!以及29种操作系统(包括手机).
47种浏览器类型：
mozilla ---> Mozilla
icab ---> iCab
lynx ---> Lynx
links ---> Links
elinks ---> ELinks
jbrowser ---> JBrowser
konqueror ---> konqueror
wget ---> wget
ask jeeves ---> Ask Jeeves/Teoma
teoma ---> Ask Jeeves/Teoma
wget ---> wget
opera ---> opera
NOKIAN ---> NOKIAN(诺基亚手机)
SPV ---> SPV(多普达手机)
Jakarta Commons ---> Jakarta Commons-HttpClient
Gecko ---> [Gecko]
aol ---> AOL
netscape ---> Netscape
firefox ---> FireFox
chimera ---> Chimera
camino ---> Camino
galeon ---> Galeon
k-meleon ---> K-Meleon
bot ---> [Bot/Crawler]
grub ---> Grub
googlebot ---> GoogleBot
msnbot ---> MSN Bot
slurp ---> Yahoo! Slurp
applewebkit ---> [AppleWebKit]
omniweb ---> OmniWeb
safari ---> Safari
msie ---> [MSIE]Internet Explorer
msn ---> MSN
aol ---> AOL
webtv ---> WebTV
myie2 ---> MyIE2
maxthon ---> Maxthon(傲游浏览器)
gosurf ---> GoSurf(冲浪高手浏览器)
netcaptor ---> NetCaptor
sleipnir ---> Sleipnir
avant browser ---> AvantBrowser
greenbrowser ---> GreenBrowser
slimbrowser ---> SlimBrowser
360SE ---> -360SE(360安全浏览器)
QQDownload ---> -QQDownload(QQ下载器)
TheWorld ---> -TheWorld(世界之窗浏览器)
icafe8 ---> -icafe8(网维大师网吧管理插件)
TencentTraveler ---> -TencentTraveler(腾讯TT浏览器)
baiduie8 ---> -baiduie8(百度IE8.0)
iCafeMedia ---> -iCafeMedia(网吧网媒趋势插件)
DigExt ---> -DigExt(IE5允许脱机阅读模式特殊标记)
baiduds ---> -baiduds(百度硬盘搜索)
CNCDialer ---> -CNCDialer(数控拨号)
NOKIAN85 ---> -NOKIAN85(诺基亚手机)
SPV_C600 ---> -SPV_C600(多普达C600)
Smartphone ---> -Smartphone(Windows Mobile for Smartphone Edition 操作系统的智能手机)
29种操作系统：
x11 ---> Unix
Unix ---> Unix
Sunos ---> SUN OS
SUN OS ---> SUN OS
PowerPC ---> PowerPC
PPC ---> PowerPC
Macintosh ---> Mac
Mac OSX ---> MacOSX
FreeBSD ---> FreeBSD
Linux ---> Linux
Palmsource ---> PalmOS
PalmOS ---> PalmOS
WAP ---> WAP Mobile Phone
Win98 ---> Win 98
NOKIAN ---> NOKIAN(诺基亚手机)
Media Center ---> Windows XP Media Center PC
Windows ---> Windows Series
Windows CE ---> Windows CE
Windows 95 ---> Windows 95
Windows 98 ---> Windows 98
Windows 2000 ---> Windows 2000
Windows XP ---> Windows XP
Windows NT ---> Windows NT Series
Windows NT 4.0 ---> Windows 9x/98/95
Windows NT 5.0 ---> Windows 2000
Windows NT 5.1 ---> Windows XP
Windows NT 5.2 ---> Windows Server 2003
Windows NT 6.0 ---> Windows Vista/Windows Server 2008
Windows NT 6.1 ---> Windows Server 2008 R2/Windows 7 Series
Tablet PC ---> -Tablet PC(平板电脑)
Jakarta Commons ---> -Jakarta Commons-HttpClient
bsalsa.com ---> -[BOT]bsalsa.com(搜索引型)
x11--->Unix--->Unix
Sunos--->SUNOS--->SUNOS
PowerPC--->PPC--->PowerPC
Macintosh--->Mac
MacOSX--->MacOSX
FreeBSD--->FreeBSD
Linux--->Linux
Palmsource--->PalmOS--->PalmOS
WAP--->WAPMobilePhone
十种常见IE插件：
360SE ---> 360SE(360安全浏览器)
QQDownload ---> QQDownload(QQ下载器)
TheWorld ---> TheWorld(世界之窗浏览器)
icafe8 ---> icafe8(网维大师网吧管理插件)
TencentTraveler ---> TencentTraveler(腾讯TT浏览器)
baiduie8 ---> baiduie8(百度IE8.0)
iCafeMedia ---> iCafeMedia(网吧网媒趋势插件)
DigExt ---> DigExt(IE5允许脱机阅读模式特殊标记)
baiduds ---> baiduds(百度硬盘搜索)
CNCDialer ---> CNCDialer(数控拨号)
以下是Asp判断客户端操作系统源码，支持自定义关键词，支持“
<%
Function GetSysVer() ''获取系统类型(可以判断:29种操作系统(包括手机))
GetSysVer="Other Unknown"
TheInfo = UCase(Request.ServerVariables("HTTP_USER_AGENT"))
if Instr(TheInfo,UCase("x11"))>0 or Instr(TheInfo,UCase("Unix"))>0 then GetSysVer="Unix"
if Instr(TheInfo,UCase("Sunos"))>0 or Instr(TheInfo,UCase("SUN OS"))>0 then GetSysVer="SUN OS"
if Instr(TheInfo,UCase("PowerPC"))>0 or Instr(TheInfo,UCase("PPC"))>0 then GetSysVer="PowerPC"
if Instr(TheInfo,UCase("Macintosh"))>0 then GetSysVer="Mac"
if Instr(TheInfo,UCase("Mac OSX"))>0 then GetSysVer="MacOSX"
if Instr(TheInfo,UCase("FreeBSD"))>0 then GetSysVer="FreeBSD"
if Instr(TheInfo,UCase("Linux"))>0 then GetSysVer="Linux"
if Instr(TheInfo,UCase("Palmsource"))>0 or Instr(TheInfo,UCase("PalmOS"))>0 then GetSysVer="PalmOS"
if Instr(TheInfo,UCase("WAP"))>0 then GetSysVer="WAP Mobile Phone"
if Instr(TheInfo,UCase("Win98"))>0 then GetSysVer="Win 98"
if Instr(TheInfo,UCase("NOKIAN"))>0 then GetSysVer="NOKIAN(诺基亚手机)"
if Instr(TheInfo,UCase("Media Center"))>0 then GetSysVer="Windows XP Media Center PC"
if Instr(TheInfo,UCase("Windows"))>0 then
GetSysVer="Windows Series"
if Instr(TheInfo,UCase("Windows CE"))>0 then GetSysVer="Windows CE"
if Instr(TheInfo,UCase("Windows 95"))>0 then GetSysVer="Windows 95"
if Instr(TheInfo,UCase("Windows 98"))>0 then GetSysVer="Windows 98"
if Instr(TheInfo,UCase("Windows 2000"))>0 then GetSysVer="Windows 2000"
if Instr(TheInfo,UCase("Windows XP"))>0 then GetSysVer="Windows XP"
if Instr(TheInfo,UCase("Windows NT"))>0 then
GetSysVer="Windows NT Series"
if Instr(TheInfo,UCase("Windows NT 4.0"))>0 then GetSysVer="Windows 9x/98/95"
if Instr(TheInfo,UCase("Windows NT 5.0"))>0 then GetSysVer="Windows 2000"
if Instr(TheInfo,UCase("Windows NT 5.1"))>0 then GetSysVer="Windows XP"
if Instr(TheInfo,UCase("Windows NT 5.2"))>0 then GetSysVer="Windows Server 2003"
if Instr(TheInfo,UCase("Windows NT 6.0"))>0 then GetSysVer="Windows Vista/Windows Server 2008"
if Instr(TheInfo,UCase("Windows NT 6.1"))>0 then GetSysVer="Windows Server 2008 R2/Windows 7 Series"
end if
end if
if Instr(TheInfo,UCase("Tablet PC"))>0 then GetSysVer=GetSysVer & "-Tablet PC(平板电脑)"
if Instr(TheInfo,UCase("Jakarta Commons"))>0 then GetSysVer=GetSysVer & "-Jakarta Commons-HttpClient"
if Instr(TheInfo,UCase("bsalsa.com"))>0 then GetSysVer=GetSysVer & "-[BOT]bsalsa.com(搜索引型)"
End Function
Response.Write GetSysVer
%>
以下是Asp判断客户端浏览器类型源码，支持自定义关键词，支持“
<%
Function GetBrType() ''获取浏览器类型(可以判断:47种浏览器;GoogLe,Grub,MSN,Yahoo!蜘蛛;十种常见IE插件)
Dim StrType, TheInfo, Tmp1, Sysver
GetBrType = "Other Unknown"
TheInfo = UCase(Request.ServerVariables("HTTP_USER_AGENT"))
if Instr(TheInfo,UCase("mozilla"))>0 then GetBrType = "Mozilla"
if Instr(TheInfo,UCase("icab"))>0 then GetBrType = "iCab"
if Instr(TheInfo,UCase("lynx"))>0 then GetBrType = "Lynx"
if Instr(TheInfo,UCase("links"))>0 then GetBrType = "Links"
if Instr(TheInfo,UCase("elinks"))>0 then GetBrType = "ELinks"
if Instr(TheInfo,UCase("jbrowser"))>0 then GetBrType = "JBrowser"
if Instr(TheInfo,UCase("konqueror"))>0 then GetBrType = "konqueror"
if Instr(TheInfo,UCase("wget"))>0 then GetBrType = "wget"
if Instr(TheInfo,UCase("ask jeeves"))>0 or Instr(TheInfo,UCase("teoma"))>0 then GetBrType = "Ask Jeeves/Teoma"
if Instr(TheInfo,UCase("wget"))>0 then GetBrType = "wget"
if Instr(TheInfo,UCase("opera"))>0 then GetBrType = "opera"
if Instr(TheInfo,UCase("NOKIAN"))>0 then GetBrType = "NOKIAN(诺基亚手机)"
if Instr(TheInfo,UCase("SPV"))>0 then GetBrType = "SPV(多普达手机)"
if Instr(TheInfo,UCase("Jakarta Commons"))>0 then GetBrType = "Jakarta Commons-HttpClient"
if Instr(TheInfo,UCase("Gecko"))>0 then
StrType = "[Gecko] "
GetBrType = "Mozilla Series"
if Instr(TheInfo,UCase("aol"))>0 then GetBrType = "AOL"
if Instr(TheInfo,UCase("netscape"))>0 then GetBrType = "Netscape"
if Instr(TheInfo,UCase("firefox"))>0 then GetBrType = "FireFox"
if Instr(TheInfo,UCase("chimera"))>0 then GetBrType = "Chimera"
if Instr(TheInfo,UCase("camino"))>0 then GetBrType = "Camino"
if Instr(TheInfo,UCase("galeon"))>0 then GetBrType = "Galeon"
if Instr(TheInfo,UCase("k-meleon"))>0 then GetBrType = "K-Meleon"
GetBrType = StrType & GetBrType
end if
if Instr(TheInfo,UCase("bot"))>0 or Instr(TheInfo,UCase("crawl"))>0 then
StrType = "[Bot/Crawler]"
if Instr(TheInfo,UCase("grub"))>0 then GetBrType = "Grub"
if Instr(TheInfo,UCase("googlebot"))>0 then GetBrType = "GoogleBot"
if Instr(TheInfo,UCase("msnbot"))>0 then GetBrType = "MSN Bot"
if Instr(TheInfo,UCase("slurp"))>0 then GetBrType = "Yahoo! Slurp"
GetBrType = StrType & GetBrType
end if
if Instr(TheInfo,UCase("applewebkit"))>0 then
StrType = "[AppleWebKit]"
GetBrType = ""
if Instr(TheInfo,UCase("omniweb"))>0 then GetBrType = "OmniWeb"
if Instr(TheInfo,UCase("safari"))>0 then GetBrType = "Safari"
GetBrType = StrType & GetBrType
end if
if Instr(TheInfo,UCase("msie"))>0 then
StrType = "[MSIE"
Tmp1 = mid(TheInfo,(Instr(TheInfo,UCase("MSIE"))+4),6)
Tmp1 = left(Tmp1,Instr(Tmp1,";")-1)
StrType = StrType & Tmp1 & "]"
GetBrType = "Internet Explorer"
GetBrType = StrType & GetBrType
end if
if Instr(TheInfo,UCase("msn"))>0 then GetBrType = "MSN"
if Instr(TheInfo,UCase("aol"))>0 then GetBrType = "AOL"
if Instr(TheInfo,UCase("webtv"))>0 then GetBrType = "WebTV"
if Instr(TheInfo,UCase("myie2"))>0 then GetBrType = "MyIE2"
if Instr(TheInfo,UCase("maxthon"))>0 then GetBrType = "Maxthon(傲游浏览器)"
if Instr(TheInfo,UCase("gosurf"))>0 then GetBrType = "GoSurf(冲浪高手浏览器)"
if Instr(TheInfo,UCase("netcaptor"))>0 then GetBrType = "NetCaptor"
if Instr(TheInfo,UCase("sleipnir"))>0 then GetBrType = "Sleipnir"
if Instr(TheInfo,UCase("avant browser"))>0 then GetBrType = "AvantBrowser"
if Instr(TheInfo,UCase("greenbrowser"))>0 then GetBrType = "GreenBrowser"
if Instr(TheInfo,UCase("slimbrowser"))>0 then GetBrType = "SlimBrowser"
if Instr(TheInfo,UCase("360SE"))>0 then GetBrType = GetBrType & "-360SE(360安全浏览器)"
if Instr(TheInfo,UCase("QQDownload"))>0 then GetBrType = GetBrType & "-QQDownload(QQ下载器)"
if Instr(TheInfo,UCase("TheWorld"))>0 then GetBrType = GetBrType & "-TheWorld(世界之窗浏览器)"
if Instr(TheInfo,UCase("icafe8"))>0 then GetBrType = GetBrType & "-icafe8(网维大师网吧管理插件)"
if Instr(TheInfo,UCase("TencentTraveler"))>0 then GetBrType = GetBrType & "-TencentTraveler(腾讯TT浏览器)"
if Instr(TheInfo,UCase("baiduie8"))>0 then GetBrType = GetBrType & "-baiduie8(百度IE8.0)"
if Instr(TheInfo,UCase("iCafeMedia"))>0 then GetBrType = GetBrType & "-iCafeMedia(网吧网媒趋势插件)"
if Instr(TheInfo,UCase("DigExt"))>0 then GetBrType = GetBrType & "-DigExt(IE5允许脱机阅读模式特殊标记)"
if Instr(TheInfo,UCase("baiduds"))>0 then GetBrType = GetBrType & "-baiduds(百度硬盘搜索)"
if Instr(TheInfo,UCase("CNCDialer"))>0 then GetBrType = GetBrType & "-CNCDialer(数控拨号)"
if Instr(TheInfo,UCase("NOKIAN85"))>0 then GetBrType = GetBrType & "-NOKIAN85(诺基亚手机)"
if Instr(TheInfo,UCase("SPV_C600"))>0 then GetBrType = GetBrType & "-SPV_C600(多普达C600)"
if Instr(TheInfo,UCase("Smartphone"))>0 then GetBrType = GetBrType & "-Smartphone(Windows Mobile for Smartphone Edition 操作系统的智能手机)"
End Function
Response.Write GetBrType
%>