|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: May 2000
Messaggi: 1135
|
Informazioni sul registro
Vorrei sapere se in qualche chiave del registro di windows sono inserite informazioni sull'hardware installato e in particolare la ram e gli HD installati.
Grazie. NapalM |
|
|
|
|
|
#2 |
|
Senior Member
Iscritto dal: Feb 2003
Città: Lucca
Messaggi: 294
|
a mio avviso non credo che queste informazioni si possano trovare nel registro di windows, però puoi usare degli script per recuperare tutte le informazioni di cui hai bisogno, esempio per la memoria
Codice:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colCSItems = objWMIService.ExecQuery("SELECT * FROM Win32_ComputerSystem")
For Each objCSItem In colCSItems
WScript.Echo "Total Physical Memory: " & objCSItem.TotalPhysicalMemory
Next
Set colOSItems = objWMIService.ExecQuery("SELECT * FROM Win32_OperatingSystem")
For Each objOSItem In colOSItems
WScript.Echo "Free Physical Memory: " & objOSItem.FreePhysicalMemory
WScript.Echo "Total Virtual Memory: " & objOSItem.TotalVirtualMemorySize
WScript.Echo "Free Virtual Memory: " & objOSItem.FreeVirtualMemory
WScript.Echo "Total Visible Memory Size: " & objOSItem.TotalVisibleMemorySize
Next
Codice:
Const HARD_DISK = 3
Set objWMIService = GetObject("winmgmts: {impersonationLevel=impersonate}!\\.\root\cimv2")
Set colDisks = objWMIService.ExecQuery ("Select * from Win32_LogicalDisk Where DriveType = " & HARD_DISK & "")
For Each objDisk In colDisks
Disco = (objDisk.FreeSpace / 1048576)
Next
__________________
very very cool very very coooool |
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 12:22.




















