как определить запущен ли ворд

[bs]

Подскажите, как определить запущена программа или нет.
Мне нужно получить сведения, запущен ли в данный момент MS Word?

Ситуация следующая. Моя программа поточно считывает информацию из вордовских документов. После прочтения документа программа закрывает его
wrd.quit

и переносит в другую папку
name perFilename as perNewFileName

Однако возникает следующая проблема. Ворд не успевает закрыться. А программа пытается переименовать все еще открытый файл.
Возникает ошибка.
Нужно поставить задержку перед переименованием. Так, чтобы программа не выполнялась дальше, пока ворд окончательно не закроется. Как узнать, закрылся ли ворд, или еще нет?

Заранее спасибо за ответ

[RayShade]

Код: Выделить всё

if not getobject(,"Word.Application") is nothing then msgbox "Word Запущен"