如何取得ie的sp版本

Question

先定义一个函数usersysinfo():
________________________________________
function usersysinfo(info,getinfo)
if instr(info,";")>0 then
dim usersys
usersys=split(info,";")
if ubound(usersys)>=2 then
usersys(1)=replace(usersys(1),"MSIE","Internet Explorer")
usersys(2)=replace(usersys(2),")","")
usersys(2)=replace(usersys(2),"NT 5.1","XP")
usersys(2)=replace(usersys(2),"NT 5.0","2000")
usersys(2)=replace(usersys(2),"9x","Me")
usersys(1)="浏 览 器：" & Trim(usersys(1))
usersys(2)="操作系统：" & Trim(usersys(2))
if getinfo=1 then
usersysinfo=usersys(1)
else
usersysinfo=usersys(2)
end if
else
if getinfo=1 then
usersysinfo="浏 览 器：未知"
else
usersysinfo="操作系统：未知"
end if
end if
else
if getinfo=1 then
usersysinfo="未知"
else
usersysinfo="未知"
end if
end if
end function
________________________________________
然后从客户端获取
Request.ServerVariables("HTTP_USER_AGENT")
________________________________________
用：
________________________________________
response.write usersysinfo(Request.ServerVariables("HTTP_USER_AGENT"),1)
_________________________________________
就能得到IE版本 usersysinfo(Request.ServerVariables("HTTP_USER_AGENT"),2)是得到操作系统版本

Answer 1

To： chinesun(石上) 
不好意思，本人不太熟，好像是VBScript吧，不会用。
你这个能获得sp的版本吗？
最好是用javascript，哈哈。