使用Sysinternals中的Handle.exe。
Shell ("c:\...\handle.exe ... >> " & app.path & "\tmp.txt",vbHide)
'...Write something which will get contents from App.path & "\tmp.txt" ...
'...Wait some time ,because killing the file at this moment
'will bring an error
Kill App.Path & "\tmp.txt"