' Kod wywietla wynik dziaania programu handle.exe
' ------ KONFIGURACJA SKRYPTU ------
strFilePattern = "<NazwaPliku>" ' np. personal.pst
strHandleExec = "handle.exe"  ' Jeli programu handle.exe nie ma w zmiennej PATH,
                                                  ' trzeba bdzie poda jego pen ciek.
' ------ KONIEC KONFIGURACJI ---------
set objWshShell = CreateObject("WScript.Shell")
set objExec = objWshShell.Exec(strHandleExec & " " & strFilePattern)
do while not objExec.StdOut.AtEndOfStream
    WScript.Echo objExec.StdOut.ReadLine()
loop
