' List Virtual Machine Serial Port Information


On Error Resume Next

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

For Each objVM in colVMS
    Set colPorts = objVM.SerialPorts
    For Each objPort in colPorts
        Wscript.Echo "Virtual machine: " & objVM.Name
        Wscript.Echo "Connect immediately: " & objPort.ConnectImmediately
        Wscript.Echo "Name: " & objPort.Name
        Wscript.Echo "Type: " & objPort.Type
        Wscript.Echo
    Next
Next
search for scripts

VbsEdit contains all these sample scripts!


Download Now!



Download   Home   Scripts

Copyright © 2001-2024 adersοft