トップ回答者
Hyper-Vでコマンドラインでスナップショットを適用できますか?

質問
回答
-
阿部です
PowerShellを使えば楽にできそうですね(WMIを使用する)
PowerShell2.0とタスクスケジューラの簡単な使い方
http://www.roomv.com/~kanehiro/index.php?itemid=459PowerShell Management Library for Hyper-V
http://pshyperv.codeplex.com/また、書籍ですが「PowerShellによるWindows サーバー管理術」にスナップショットを作成するサンプルスクリプトがありました。(P243 Script 6-35)
以上、参考になれば幸いです。
MVP:Virtual Machine Blog:MCTの憂鬱 http://naonao71.spaces.live.com/- 回答としてマーク 三沢健二Moderator 2010年11月25日 5:15
-
VBScript ですと
Function CreateSnapShot(strVMName)
こんな感じです
Dim objWMIService, objManagementService, objComputerSystem
Set objWMIService = GetObject("winmgmts:\\.\root\virtualization")
Set objManagementService = objWMIService.ExecQuery("SELECT * FROM Msvm_VirtualSystemManagementService").ItemIndex(0)
Set objComputerSystem = objWMIService.ExecQuery("SELECT * FROM Msvm_ComputerSystem WHERE ElementName = '" & strVMName & "'").ItemIndex(0)
Dim objInParam, objOutParams
Set objInParam = objManagementService.Methods_("CreateVirtualSystemSnapshot").InParameters.SpawnInstance_()
objInParam.SourceSystem = objComputerSystem.Path_.Path
Set objOutParams = objManagementService.ExecMethod_("CreateVirtualSystemSnapshot", objInParam)
End Function
WIN1- 回答としてマーク 三沢健二Moderator 2010年11月25日 5:15
すべての返信
-
阿部です
PowerShellを使えば楽にできそうですね(WMIを使用する)
PowerShell2.0とタスクスケジューラの簡単な使い方
http://www.roomv.com/~kanehiro/index.php?itemid=459PowerShell Management Library for Hyper-V
http://pshyperv.codeplex.com/また、書籍ですが「PowerShellによるWindows サーバー管理術」にスナップショットを作成するサンプルスクリプトがありました。(P243 Script 6-35)
以上、参考になれば幸いです。
MVP:Virtual Machine Blog:MCTの憂鬱 http://naonao71.spaces.live.com/- 回答としてマーク 三沢健二Moderator 2010年11月25日 5:15
-
VBScript ですと
Function CreateSnapShot(strVMName)
こんな感じです
Dim objWMIService, objManagementService, objComputerSystem
Set objWMIService = GetObject("winmgmts:\\.\root\virtualization")
Set objManagementService = objWMIService.ExecQuery("SELECT * FROM Msvm_VirtualSystemManagementService").ItemIndex(0)
Set objComputerSystem = objWMIService.ExecQuery("SELECT * FROM Msvm_ComputerSystem WHERE ElementName = '" & strVMName & "'").ItemIndex(0)
Dim objInParam, objOutParams
Set objInParam = objManagementService.Methods_("CreateVirtualSystemSnapshot").InParameters.SpawnInstance_()
objInParam.SourceSystem = objComputerSystem.Path_.Path
Set objOutParams = objManagementService.ExecMethod_("CreateVirtualSystemSnapshot", objInParam)
End Function
WIN1- 回答としてマーク 三沢健二Moderator 2010年11月25日 5:15