asked on

getting registry size in wmi or vb

Hey, I want to be able to get the registry size of a windows 2000 workstation. It would be cool if it could loop through and get a bunch of machine names.

Booda2us

1. In Control Panel, double-click System.
2. On the Performance tab, click Change in the Virtual Memory section.
3. In the Virtual Memory dialog box, in the Registry Size section, the current registry size and the maximum registry size are displayed. I hope this helps you out...Booda2us

tuckcorp

ASKER

Thanks, but I need a way to connect to a remote machine and get this info

ASKER CERTIFIED SOLUTION

Krompton

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

haim96

there is a tool by microsoft named: DUREG.EXE
that check your registry size. you can download it free from
here :
https://www.microsoft.com/downloads/details.aspx?familyid=1562BCE1-A45E-4445-90A7-6E0342E5DC03&displaylang=en

about WMI , well i hope this one will work for you:
'**********************************************+
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Registry",,48)

For Each objItem in colItems
WScript.Echo "Caption: " & objItem.Caption
WScript.Echo "CurrentSize: " & objItem.CurrentSize
WScript.Echo "Description: " & objItem.Description
WScript.Echo "InstallDate: " & objItem.InstallDate
WScript.Echo "MaximumSize: " & objItem.MaximumSize
WScript.Echo "Name: " & objItem.Name
WScript.Echo "ProposedSize: " & objItem.ProposedSize
WScript.Echo "Status: " & objItem.Status
WScript.Echo ""
Next

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_UserInDomain",,48)

For Each objItem in colItems
WScript.Echo "GroupComponent: " & objItem.GroupComponent
WScript.Echo "PartComponent: " & objItem.PartComponent
WScript.Echo ""
Next

'*******************************************************

it's from :
http://www.adminscripteditor.com/scriptlibrary/view.asp?id=351

Krompton

BTW...

there are a number of very useful scripts available at
http://www.microsoft.com/technet/scriptcenter/scripts/default.mspx

You can also download the Scriptomatic(V2) tool and create basic scripts you can modify quickly (quickly :) depends on your scripting knowledge of course) to suit your needs. That's where I created the one in my previous post. Took about 2 min.

Cheers,
Krompton