Je vous propose ici un script en VBScript permettant de monter une image .ISO sur le lecteur DVD de toutes les machines virtuelles d’un hôte Virtual Server 2005.
J’utilise ce script lorsque je souhaite appliquer un patch sur des environnements virtuels cloisonnés, et donc inaccessibles depuis ma machine.
on error resume next
Set objVS = CreateObject("VirtualServer.Application")
set colVMs = objVS.VirtualMachines
For Each objVM in colVMS
Set colDVDDrives = objVM.DVDROMDrives
For Each objDrive in colDVDDrives
errReturn = objDrive.AttachImage("C:\votreimage.iso")
Next
Next