国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 開發(fā) > JS > 正文

識別操作系統(tǒng)是不是vista的js代碼

2024-09-06 12:41:38
字體:
供稿:網(wǎng)友
如何用ASP來識別操作系統(tǒng)是vista的?我在網(wǎng)上找了個(gè)函數(shù),但是不能判斷是vista系統(tǒng),希望大家?guī)兔?
這個(gè)是我在網(wǎng)上找的函數(shù):
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
如果大家還有更好的函數(shù),也給小弟一個(gè),我先謝過了.

[Ctrl+A 全選 注:如需引入外部Js需刷新才能執(zhí)行]
發(fā)表評論 共有條評論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 太仓市| 西充县| 墨竹工卡县| 禄丰县| 阳新县| 井研县| 库车县| 灌阳县| 横峰县| 新源县| 东辽县| 汝城县| 儋州市| 垫江县| 定安县| 西城区| 台中县| 武胜县| 桐梓县| 宜春市| 贞丰县| 清徐县| 蕲春县| 高台县| 鹿邑县| 密云县| 铜鼓县| 庐江县| 平顶山市| 定安县| 揭阳市| 晋宁县| 原阳县| 孝感市| 肃宁县| 曲水县| 宜丰县| 阳信县| 南溪县| 三门峡市| 阳信县|