OS Version 文字列の取得

  GetOSString.vbs



  
Set Ie = CreateObject("InternetExplorer.Application")
Ie.Navigate( "about:blank" )

WorkStr = Ie.Document.parentWindow.navigator.appVersion
WorkStr = Replace(WorkStr,")", "" )
WorkArray = Split( WorkStr, ";" )
Wscript.Echo Trim( WorkArray( UBound( WorkArray ) ) )

Ie.Quit
  

  もっと詳しく



  
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
 & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
 
Set colOSes = objWMIService.ExecQuery("Select * from Win32_OperatingSystem")
For Each objOS in colOSes
	Wscript.Echo "Computer Name: " & objOS.CSName
	Wscript.Echo "Caption: " & objOS.Caption 'Name
	Wscript.Echo "Version: " & objOS.Version 'Version & build
	Wscript.Echo "Build Number: " & objOS.BuildNumber 'Build
	Wscript.Echo "Build Type: " & objOS.BuildType
	Wscript.Echo "OS Type: " & objOS.OSType
	Wscript.Echo "Other Type Description: " & objOS.OtherTypeDescription
	WScript.Echo "Service Pack: " & objOS.ServicePackMajorVersion & "." & _
	objOS.ServicePackMinorVersion
Next
  

http://www.microsoft.com/technet/scriptcenter/scripts/os/version/ostveb02.mspx











   SQLの窓    create:2005/08/28  update:2014/09/07   管理者用(要ログイン)





フリーフォントWEBサービス

SQLの窓WEBサービス

SQLの窓フリーソフト

写真素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ