2
I am developing a project in Visual Basic and would like to know how I can read the amount of slots/ RAM banks there are in use in the computer, also the value of RAM installed in each slot/ bank in use, and the total RAM.
2
I am developing a project in Visual Basic and would like to know how I can read the amount of slots/ RAM banks there are in use in the computer, also the value of RAM installed in each slot/ bank in use, and the total RAM.
3
Welcome to OS/en
You can get the information using the WMI
in his vbs
:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_PhysicalMemory",,48)
Total_size = 0
For Each objItem in colItems
size = FormatNumber(objItem.Capacity/1024^3, 0)
Wscript.Echo "Slot: " + objItem.BankLabel + vbNewLine + "Capacidade: " & size & "GB" & vbNewLine + "Obs.: " + objItem.Tag
Total_size= (Total_size + size)
Next
Wscript.Echo "Total de Ram: " & Total_size & "GB"
Or with a Slots counter in use:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_PhysicalMemory",,48)
Total_Size = 0
Total_Slot = 0
For Each objItem in colItems
Size = FormatNumber(objItem.Capacity/1024^3, 0)
If Size <> 0 Then
Wscript.Echo "Slot: " + objItem.BankLabel + vbNewLine + "Capacidade: " & Size & "GB" & vbNewLine + "Obs.: " + objItem.Tag
Total_Size= (Total_Size + Size)
Total_Slot= Total_Slot + 1
End If
Next
Wscript.Echo "Slots em uso: " & Total_Slot & vbNewLine & "Total de Ram: " & Total_size & "GB"
Browser other questions tagged visual-basic-6 vbs
You are not signed in. Login or sign up in order to post.
What is memory slot?
– Maniero
Type want to know how many memory combs my computer has, example: 2 comb 4 GB, totaling 8 GB
– Felipe