Ben Armstrong provided another interesting script. This one helps gathering network statistics for virtual machines in a VIrtual Server 2005 environment:
Set vs = CreateObject(“VirtualServer.Application”)
set vms = vs.VirtualMachines
For Each vm in vms
Wscript.Echo “Virtual machine: ” & vm.Name
Wscript.Echo “Network bytes sent: ” & vm.Accountant.NetworkBytesSent
Wscript.Echo “Network bytes received: ” & vm.Accountant.NetworkBytesReceived
Be sure to read the original post for updates and comments.