Ничего не могу понять. При формировании Word-овского документа вылазит ошибка 'Ошибка OLE, код 0*80010105. Ошибка на сервере'.
Происходит это при открытии документа.

На всех других компьютерах все работает нормально.
Переустановили ОС и Office - 2000 и XP соответственно.
Ошибка все равно вылазит.

Непонятно в чем именно проблема: в коде программы или в системе.
Ниже сам код

IcDoc='dogovor.doc'
if file(IcDoc)
IoWord=createobject('word.application')
if type('IoWord')='O'

*ошибка вылазит на следующей команде
IoDoc=IoWord.Documents.Open(fullpath(IcDoc))

IoDoc.Variables.Item('nom_dog').Value=alltr(str(nd1.nom_dog))

IoDoc.Fields.Update
IoWord.Visible=.t.

=MessageBox('***')

IoWord.quit(.F.)

endif
else
MessageBox('File not found')
endif

Если кто знает помогите, пожалуйста.

Что-то я не совсем понял в чем принципиальная разница между этими двумя командами. И почему все работает на других машинах?

На данном компьютере тоже нет проблем до определенного момента (какого не понятно). А потом - ошибка. И помогает только переустановка офиса. Последний раз вместо XP поставили 2000-ный. Пока ошибка больше не появлялась.

fullpath() проверил. Возвращает то, что нужно.


Спасибо за проявленное внимание.