[VBScript] Ermitteln, ob das Betriebssystem eines beliebigen Rechners 64bit oder 32bit ist.
Gepostet am: Mar 12, 2011 2:29:6 PM
system32or64bit.vbs <Namen der Rechner [wenn leer, lokaler Rechner]>
' HISTORY:' 0.1 - 12.03.2011 - Basisskript' ---------------------------- CONFIGURATION ----------------------------' ------------------------------ DECLARATION ------------------------------' ---------------------------- USED FUNCTIONS ----------------------------' ---------------------------- USED PROCEDURES ----------------------------' ------------------------------- ARGUMENTS -------------------------------'einzelne übergebene Parameter auslesenif WScript.Arguments.Count <> 0 then Set objArgs = WScript.Arguments For Each objArg in objArgs Call SystemErmitteln(objArg) next else Call SystemErmitteln(".")end if Set objArgs = nothing WScript.Quit Sub SystemErmitteln(strComputer) Set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colOSs = objWMI.ExecQuery("Select * from Win32_OperatingSystem") For Each OS in colOSs OSType = OS.OSArchitecture Next if strComputer = "." then Set WshNetwork = WScript.CreateObject("WScript.Network") strComputer = WshNetwork.ComputerName WScript.Echo strComputer & " ist " & OSType else WScript.Echo strComputer & " ist " & OSType end if set objWMI = nothing set colOSs = nothing Set WshNetwork = nothing end sub
für eigenen Rechner: system32or64bit.vbs
für andere Netzwerkrechner system32or64bit.vbs Rechner1 Rechner2 Rechner3 ...