Имеется следующая задача.
В БД Visual Foxpro есть таблица. Есть интерфейс на эту БД. Существует стандартный шаблон контракта в формате MS Word. Необходимо из интерфейса передать данные на поля Text Form Field данного контракта.

Local lcDoc

lcDoc='C:\contract.doc'

If File(lcDoc)
Local loWord
Local loDoc

loWord=Createobject('word.application')

If Type('loWord')='O'

loDoc=loWord.Documents.Open(Fullpath(lcDoc))
loDoc.тут_нужен_указатель_к_полю=alltrim(TableName.FieldName)

Endif
Else
Messagebox('File not found')

Endif

Подскажите пожалуйста,
Заранее благодарен за ответы.

vkluchwrd = createObject("Word.Application")
wrd.Documents.Open("Name_file")
wrd.Selection.GoTo(-1,,,"num") && num - имя закладки в Word
wrd.Selection.InsertAfter(ALLTRIM(OutValue)) && OutValue - ваше значение

Здесь, wrd.Selection.InsertAfter вставляет зачение только после закладки в Word а как написать так чтобы встявлят в саму закладку???

vkluchНе понял что значит в саму закладку.
Закладка это просто место для вставки.

У меня в документе объект Text Form Field, понимаешь?
Вот в нее и надо вставить. Твой код супер, но так InsertAfter вставляет данные ПОСЛЕ объекта а на в саму.

Помоги

ВладимирМВот это подойдет?

Как мне вывести данные в существующий MS WORD документ

Просто супер!!!
Спасибо!!!