Tomasz Chmielewski log:
[...]
> jakim narzedziem wydobyc wersje jezykowa Windows?
W XP/2003 może pomoże:-)
OS_Ver-LngInfo.vbs
----------
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
Wscript.Echo "Nazwa: " & objOperatingSystem.Caption
Wscript.Echo "Wersja: " & objOperatingSystem.Version
Wscript.Echo "Typ: " & objOperatingSystem.BuildType
Wscript.Echo "Kod języka: " & objOperatingSystem.OSLanguage
Next
---- P.S. Dla 9x/NT pewnie coś wymyśliłoby się ... ale ich akurat (pod ręką) nie mam ... no i oczka mi opadają;-) -- ~~~mb GL&BEReceived on Mon Apr 24 00:30:06 2006
To archiwum zostało wygenerowane przez hypermail 2.1.8 : Mon 24 Apr 2006 - 00:42:03 MET DST