ASP获取客户端操作系统简洁版:
<%
dim thesoft,sysver
thesoft=Request.ServerVariables("HTTP_USER_AGENT")
if instr(thesoft,"Windows NT 5.0") then
OS="Windows 2000"
elseif instr(thesoft,"Windows NT 5.2") then
sysver="Windows 2003"
elseif instr(thesoft,"Windows NT 5.1") then
sysver="Windows XP"
elseif instr(thesoft,"Windows NT") then
sysver="Windows NT"
elseif instr(thesoft,"Windows 9") then
sysver="Windows 9x"
elseif instr(thesoft,"unix") or instr(thesoft,"linux") or instr(thesoft,"SunOS") or instr(thesoft,"BSD") then
sysver="Similar unix"
elseif instr(thesoft,"Mac") then
sysver="Mac"
else
sysver="Other"
end if
response.write(sysver)
%> |
文章作者
Nuclear'Atk
上次更新
2010-09-09
许可协议
Nuclear'Atk(核攻击)网络安全实验室版权所有,转载请注明出处。