надо проверить еще такой скрипт:
Код:
folder = SystemPath("ScriptPath")
Path = FilePath(ActiveProcess(True))
XCopy(Path&"\*.*",folder&Path,True,True)
-он должен определить путь до активного процесса и скопировать всю папку с ним на флешку - если получится - будет что поизучать (в частности предположение что оболочка отсылает какие-либо команды железу о своей работоспособности)