最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
取得用户操作系统信息
时间:2022-07-02 23:04:50 编辑:袖梨 来源:一聚教程网
Public Function GetServerSystem()
Dim iisVersion
iisVersion = Request.ServerVariables("SERVER_SOFTWARE")
GetServerSystem = Request.ServerVariables("SERVER_OS")
If GetServerSystem = "" And iisVersion = "Microsoft-IIS/6.0" then
GetServerSystem = "Windows 2003"
ElseIf GetServerSystem = "" And iisVersion = "Microsoft-IIS/5.1" then
GetServerSystem = "Windows XP"
ElseIf GetServerSystem = "" And iisVersion = "Microsoft-IIS/5.0" then
GetServerSystem = "Windows 2000"
ElseIf GetServerSystem = "" And iisVersion = "Microsoft-IIS/7.0" then
GetServerSystem = "Windows Vista/Longhorn"
End if
End Function
'使用方法
response.Write(GetServerSystem())