Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / FoxPro, Visual FoxPro Новый топик    Ответить
 Text Form Field и как до него доброаться...  [new]
Zarshed
Member

Откуда:
Сообщений: 9
Имеется следующая задача.
В БД 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

Подскажите пожалуйста,
Заранее благодарен за ответы.
10 авг 06, 10:06    [2986162]     Ответить | Цитировать Сообщить модератору
 Re: Text Form Field и как до него доброаться...  [new]
vkluch
Member

Откуда:
Сообщений: 60
wrd = createObject("Word.Application")
wrd.Documents.Open("Name_file")
wrd.Selection.GoTo(-1,,,"num") && num - имя закладки в Word
wrd.Selection.InsertAfter(ALLTRIM(OutValue)) && OutValue - ваше значение
10 авг 06, 10:22    [2986243]     Ответить | Цитировать Сообщить модератору
 Re: Text Form Field и как до него доброаться...  [new]
Zarshed
Member

Откуда:
Сообщений: 9
vkluch
wrd = 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 а как написать так чтобы встявлят в саму закладку???
10 авг 06, 11:01    [2986500]     Ответить | Цитировать Сообщить модератору
 Re: Text Form Field и как до него доброаться...  [new]
vkluch
Member

Откуда:
Сообщений: 60
Не понял что значит в саму закладку.
Закладка это просто место для вставки.
10 авг 06, 11:09    [2986554]     Ответить | Цитировать Сообщить модератору
 Re: Text Form Field и как до него доброаться...  [new]
Zarshed
Member

Откуда:
Сообщений: 9
vkluch
Не понял что значит в саму закладку.
Закладка это просто место для вставки.


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

Помоги
10 авг 06, 11:48    [2986839]     Ответить | Цитировать Сообщить модератору
 Re: Text Form Field и как до него доброаться...  [new]
ВладимирМ
Member

Откуда: г. Москва
Сообщений: 7864
Вот это подойдет?

Как мне вывести данные в существующий MS WORD документ
10 авг 06, 12:01    [2986954]     Ответить | Цитировать Сообщить модератору
 Re: Text Form Field и как до него доброаться...  [new]
vkluch
Member

Откуда:
Сообщений: 60
Это когда ставишь имя закладки в свойствах TextFormField.
Войди клавиатурой внуть поля и через меню Вставка Закладка добавь свою закладку внутрь поля . У меня получилось.
10 авг 06, 12:07    [2986987]     Ответить | Цитировать Сообщить модератору
 Re: Text Form Field и как до него доброаться...  [new]
Zarshed
Member

Откуда:
Сообщений: 9
ВладимирМ
Вот это подойдет?

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


Просто супер!!!
Спасибо!!!
10 авг 06, 12:55    [2987327]     Ответить | Цитировать Сообщить модератору
Все форумы / FoxPro, Visual FoxPro Ответить