' Restore a Metabase Using a Password
Const MD_BACKUP_HIGHEST_VERSION = &HFFFFFFFE
strComputer = "LocalHost"
Set objComputer = GetObject("IIS://" & strComputer & "")
objComputer.RestoreWithPassword "ScriptedBackup", _
MD_BACKUP_HIGHEST_VERSION, 0, " ie456@k"