|
|
|
|
-
'
VBScript source code
-
' The
following WinDbg vbscript example
will allow you to recursively search
for *.deb files
-
' and
analyse each one. The script will
aso go to msdl.microsoft.com/download/symbols
to
-
'
acquire any needed symbol files.
-
-
'START
-
Set
fso = CreateObject("Scripting.FileSystemObject")
-
Set
Folder = fso.GetFolder(".")
-
Set
Files = Folder.Files
-
Set
WshShell = CreateObject("WScript.Shell")
-
For
Each
File In
Files
-
If
Mid(File.Name, Len(File.Name) -3, 4)
= ".dmp"
Then
-
Set
oExec = WshShell.Exec("C:\Program
Files\Debugging Tools for Windows\WinDbg.exe
-y " & _
-
"srv*c:\ms*http://msdl.microsoft.com/download/symbols"
& _
-
" -z "
+ File.Name +
" -c
""$$><c:\scripts\MiniDmp2Txt.txt;
q"" -Q -QS -QY -QSY")
-
Do
While
oExec.Status = 0
-
WScript.Sleep 1000
-
Loop
-
End
If
-
Next
-
'END
|
|
|
|
|
|
