|
|
От: | Vesna | |
| Дата: | 14.05.03 08:07 | ||
| Оценка: | |||
|
|
От: |
serg_p
|
|
| Дата: | 14.05.03 08:30 | ||
| Оценка: | |||
Set locator = CreateObject("WBemScripting.SwbemLocator")
Set services = locator.ConnectServer(".")
Set controllers = services.ExecQuery("SELECT * FROM Win32_VideoController")
For Each controller in controllers
WScript.Echo(controller.AdapterRAM / 1024 /1024)
Next