- 2007-10-07 (日) 4:44
- 未分類
Virtual Server管理をスクリプトを自動化させるスクリプト
任意のバーチャルマシンをシャットダウンさせる
On Error Resume Next
Dim objVS
Dim objVM
Dim strMachine
strMachine = "マシン名"
Set objVS = CreateObject("VirtualServer.Application")
Set objVM = objVS.FindVirtualMachine(strMachine)
Set objGuestOS = objVM.GuestOS
objGuestOS.Shutdown()
Set objVS = Nothing
Set objVM = Nothing
全サーバの状態を保存して停止
On Error Resume Next
Set objVS = CreateObject("VirtualServer.Application")
Set colVMS = objVS.VirtualMachines
For Each objVM in colVMS
objVM.Save
Next
参考リンク
Microsoft Virtual Server Reference
関連する記事
- Newer : 覇邪の封印にはまってみる その2@ファミコン
- Older : ディレクトリを作成する@VBS
Comments:0
Trackbacks:1
- Trackback URL for this entry
- http://pnpk.net/cms/archives/309/trackback
- Listed below are links to weblogs that reference
- Virtual Serverをスクリプトで自動化させる@VBS from http://pnpk.net
- trackback from aspxの日記2008(ASP++ブログ) by Moo 08-09-05 (金) 16:18
-
saveState AllVMs.vbs…
今日のお仕事終了!とかの時に使ってください Virtual Server管理をスクリプトを自動化させるスクリプト ? Virtual Serverをスクリプトで自動化 (more…)