Const UMMIRROR = "C:\Program Files\UltraMon\UMMirrorClient.exe"
Const DELAY = 5 'delay in seconds before starting mirroring again

If WScript.Arguments.Count <> 1 Then
	WScript.Echo "Usage: RunMirrorConfig.vbs <mirrorconfig.reg>" & vbNewline & vbNewline & "Example: RunMirrorConfig.vbs ""C:\Temp\Mirror config 1.reg"""
	WScript.Quit
End If

cfg = WScript.Arguments(0)
Set sh = CreateObject("WScript.Shell")
sh.Run """" & UMMIRROR & """ /stop",, True
WScript.Sleep DELAY * 1000
sh.Run "%WINDIR%\regedit.exe /s """ & cfg & """",, True
sh.Run """" & UMMIRROR & """ /start",, False