' List Network Adapter Information for All Virtual Machines


On Error Resume Next

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

For Each objVM in colVMS
    Set colNetworkAdapters = objVM.NetworkAdapters
    For Each objAdapter in colNetworkAdapters
        Wscript.Echo "Virtual machine: " & objVM.Name
        Wscript.Echo "Network adapter ID: " & objAdapter.ID
        Wscript.Echo "Ethernet address: " & objAdapter.EthernetAddress
        Wscript.Echo "Is ethernet address dynamic: " & _
            objAdapter.IsEthernetAddressDynamic
        Wscript.Echo "Virtual machine: " & objAdapter.VirtualMachine
        Wscript.Echo "Virtual network: " & objAdapter.VirtualNetwork
        Wscript.Echo
    Next
Next

search for scripts

VbsEdit contains all these sample scripts!





Home   Scripts

Copyright © 2001-2019 adersοft