获取环境变量的问题
<body><%
function system(text)
if instr(text,"nt 5.2")>0 then
system="windows 2003"
elseif instr(text,"nt 5.1")>0 then
system="windows xp"
elseif instr(text,"nt 5")>0 then
system="windows 2000"
elseif instr(text,"nt 4")>0 then
system="windows nt4"
elseif instr(text,"nt 4.9")>0 then
system="windows 4.9"
elseif instr(text,"nt me")>0 then
system="windows me"
elseif instr(text,"nt 98")>0 then
system="windows 98"
elseif instr(text,"nt 95")>0 then
system="windows 95"
else
system="未知"
end if
end function
function browser (text)
if instr(text,"MSIE6.0")>0 then
browser ="internet Ezplorer 6.0"
elseif instr(text,"MSIE5.5")>0 then
browser ="internet Ezplorer 5.5"
elseif instr(text,"MSIE5.01")>0 then
browser ="internet Ezplorer 5.01"
elseif instr(text,"MSIE5.0")>0 then
browser ="internet Ezplorer 5.0"
elseif instr(text,"MSIE4.0")>0 then
browser ="internet Ezplorer 4.0"
else browser="unknown"
end if
end function
ip=request.ServerVariables("remote addr")
os ie=request.ServerVariables("http user agent")
os=system(os ie)
ie=browser(os ie)
iip array=split(ip,".")
iip=iip array(0)&"."&iip array(1)&"."&iip array(2)&".*"
ip=mid(ip,1,instrrev(ip,"."))&"*"
response.write"访问者的ip:"&ip&"<br>"
response.write"访问者的机器环境："&os ie&"<br>"
response.write"访问者的炒作系统："&os&"<br>"
response.write"访问者的浏览器型号"&ie&"<br>"
%>
</body>
</html>
这个有什么问题啊？
