Dumpel.exe script

[Mondo327]

I'm trying to write a script that runs dumpel.exe, but I can't get it to run.

TIA.

Mondo

$file = FileOpen(@ScriptDir & "\_servers.txt", 0)

$log = InputBox ( "Event Log Reader", "Enter the event log you want to read:", "system or application or security")

$event = InputBox ( "Event Log Reader", "Enter the number of the event you want to read:", "19 or 22 or 4377")

$source = InputBox ( "Event Log Reader", "Enter the source of the event:", "Windows Update Agent or NtServicePack or Print")

$outfile = InputBox ( "Event Log Reader", "Enter the name of the output file:", "log and event # ie sys4377")

; Check if file opened for reading OK

If $file = -1 Then

MsgBox(0, "Error", "Unable to open file.")

Exit

EndIf

; Read in lines of text until the EOF is reached

While 1

$line = FileReadLine($file)

If @error = -1 Then ExitLoop

RunWait(@ScriptDir & "\dumpel -s \\" & $line & " -l " & $log & " -m " & $source & " -e " & $event & " -t -c -d 2 >>" & @ScriptDir & "\" & $outfile)

;c:\_scripts\dumpel -s \\barney -l system -m "windows update agent" -e 19 -t -c -d 2 >>c:\_reports\SYS19.txt

;Sleep(150000)

Wend

FileClose($file)