list virtual server hard disk information.vbs

mnogo korisnih aplikacija i apleta za administraciju pisanih u visual basic script jeziku

On Error Resume Next

Set objVS = CreateObject("VirtualServer.Application")
Set objHardDisk = objVS.GetHardDisk _
    ("C:\Virtual Machines\Disks\Windows 2000 Server Hard Disk.vhd")
Wscript.Echo "Hard disk type: " & objHardDisk.Type