Re: Jak sprawdzic wersje.

marcin log:
> Witam,
> jedna firma poprosila o opieke nad siecia. Jest tam serwer 2003. Pytanko
> mam takie: gosc ma licencje na Small Business Server 2003, a ja nie
> bardzo widze tam aby small business byl zainstalowany. Wyglada mi to na
> pelna wersje. Gdy dam wlasciwosci komputera to jest napis Microsoft
> Windows Server 2003 Standard Edition. Takze logo podczas startu oraz
> pasek logowanie nie ma zadnych informacji o tym, ze to jest small
> business. Czy jest jakas inna metoda sprawdzenia i upewnienia sie co do
> wersji serwerowej
[...]
Może pomoże innaczej ...:-)

SprawdzWersję.vbs
---------------------------
Set dtmConvertedDate = CreateObject("WbemScripting.SWbemDateTime")
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 "Build Numer: " & objOperatingSystem.BuildNumber
  Next

-- 
...Ważne do wyczerpania zapasów..."