这个是我在网上找的函数:
FunctionGetCurrOS()
DimInfo
Info=navigator.appVersion
IfInstr(info,"NT5.1")>0Then
GetCurrOS="WindowsXP"
ElseIfInstr(info,"Tel")>0Then
GetCurrOS="Telport"
ElseIfInstr(info,"webzip")>0Then
GetCurrOS="webzip"
ElseIfInstr(info,"flashget")>0Then
GetCurrOS="flashget"
ElseIfInstr(info,"offline")>0Then
GetCurrOS="offline"
ElseIfInstr(info,"NT5")>0Then
GetCurrOS="Windows2000"
ElseIfInstr(info,"NT4")>0Then
GetCurrOS="WindowsNT4"
ElseIfInstr(info,"98")>0Then
GetCurrOS="Windows98"
ElseIfInstr(info,"95")>0Then
GetCurrOS="Windows95"
Else
GetCurrOS="UnKnow"
EndIf
EndFunction
如果大家还有更好的函数,也给小弟一个,我先谢过了.
[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]