версия ос

  1. Кирилл

    VB 6 Как лучше определить версию, разрядность и язык ОС на VB6?

    Я использовал такой вариант: 'определение битности ОС For Each objOStype In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem") 'WScript.Echo "PC type = " & objOStype.SystemType strOSbit = objOStype.SystemType Next If LCase(strOSbit) = "x86-based pc"...
Сверху Снизу