Contact Info

Crumbtrail » Administration » Scripts » Adsi

Compact a Virtual Hard Disk in Windows

You can use any of the VBScript programs below in ActiveXperts Network Monitor. Click here for an explanation about how to include scripts in ActiveXperts Network Monitor.

Compact a Virtual Hard Disk in Windows using VBScript, WMI and LDAP


On Error Resume Next

Set objVS = CreateObject("VirtualServer.Application")
set colVMs = objVS.VirtualMachines

For Each objVM in colVMS
    Set colHardDiskConnections = objVM.HardDiskConnections
    For Each objDrive in colHardDiskConnections
        Set objHardDisk = objDrive.HardDisk