视频1 视频21 视频41 视频61 视频文章1 视频文章21 视频文章41 视频文章61 推荐1 推荐3 推荐5 推荐7 推荐9 推荐11 推荐13 推荐15 推荐17 推荐19 推荐21 推荐23 推荐25 推荐27 推荐29 推荐31 推荐33 推荐35 推荐37 推荐39 推荐41 推荐43 推荐45 推荐47 推荐49 关键词1 关键词101 关键词201 关键词301 关键词401 关键词501 关键词601 关键词701 关键词801 关键词901 关键词1001 关键词1101 关键词1201 关键词1301 关键词1401 关键词1501 关键词1601 关键词1701 关键词1801 关键词1901 视频扩展1 视频扩展6 视频扩展11 视频扩展16 文章1 文章201 文章401 文章601 文章801 文章1001 资讯1 资讯501 资讯1001 资讯1501 标签1 标签501 标签1001 关键词1 关键词501 关键词1001 关键词1501 专题2001
识别操作系统是不是vista的js代码_javascript技巧
2020-11-27 20:37:55 责编:小采
文档


如何用ASP来识别操作系统是vista的?我在网上找了个函数,但是不能判断是vista系统,希望大家帮忙.
这个是我在网上找的函数:
Function GetCurrOS()
  Dim Info
  Info = navigator.appVersion
  If Instr(info,"NT 5.1")>0 Then
  GetCurrOS = "Windows XP"
  ElseIf Instr(info,"Tel")>0 Then
  GetCurrOS = "Telport"
  ElseIf Instr(info,"webzip")>0 Then
  GetCurrOS = "webzip"
  ElseIf Instr(info,"flashget")>0 Then
GetCurrOS = "flashget"
  ElseIf Instr(info,"offline")>0 Then
  GetCurrOS = "offline"
  ElseIf Instr(info,"NT 5")>0 Then
  GetCurrOS = "Windows 2000"
  ElseIf Instr(info,"NT 4")>0 Then
  GetCurrOS = "Windows NT4"
  ElseIf Instr(info,"98")>0 Then
  GetCurrOS = "Windows 98"
  ElseIf Instr(info,"95")>0 Then
  GetCurrOS = "Windows 95"
  Else
  GetCurrOS = "UnKnow"
  End If
  End Function
如果大家还有更好的函数,也给小弟一个,我先谢过了.

[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]

下载本文
显示全文
专题