Как да получите данни от Word към VFP
Кажете ми коя функция може да получи текста на файловете, записани във формат Word. Форматиране, шрифт, таблици и фигури и др. не са необходими, просто се нуждаете от текст от файла, за да влезете във VFP. (разбира се не на ръка)
Мога да си представя как да отворя Word и да напиша информация в Word от VFP, но напротив, не много.
По същия начин трябва да получите текст от PDF файл (или да ги конвертирате автоматично в word от програмата VFP)
Здравей Вячеслав! Вие написахте на петък, 6 май 2005 г. 15:43:12 +0000 (UTC):
BB> Кажете ми коя функция може да получи текста на файлове, съхранявани в BB> Word формат. BB> Форматиране, шрифт, таблици и картинки и др. не е необходимо, просто е необходимо BB> вземете текст от файл във VFP. (естествено не ръчно) ВВ> Как да отворите Word и да запишете информация в Word от VFP Представям, a BB> напротив, не BB> Много.
Процесът е основно същият. oWord = CreateObject("Word.Application") oDoc = m.oWord.Documents.Open("My document.doc") ? m.oDoc.Content.Text
BB> По същия начин трябва да получите текста от PDF файл (или да ги конвертирате автоматично в BB> дума от програмата VFP)
Не знам за начин за конвертиране на PDF в нещо друго - въпреки че е възможно Acrobat да се автоматизира по някакъв начин, това изобщо не е факт. Освен това има всякакви глупави "защита срещу копиране, защита при печат".
Добър ден, Игор! Весели празници!
07 май 05 03:16 Игор Корольов -> Веденин Вячеслав
IK> И процесът не е фундаментално различен. IK> oWord = CreateObject("Word.Application") IK> oDoc = m.oWord.Documents.Open("Моят документ.doc") IK> ? m.oDoc.Content.Text
1. В този пример VFP8 наслагва редове на документа един по един върху на екрана.:(( Изглежда, че примерът "изяжда" нови редове. Когато създавате документ в Word, редът е завършен с натискане на .
2. При повторно отваряне на файла "My document.doc" в Word, Word предупреждава, че този документ е отворен "само за четене". IMHO, тогава потребителят ще задава ненужни въпроси. :) Да, и аз самият не разбрах как да върна този документ в предишното му състояние.
3. Къде мога да прочета повече за това?
P.S. Благодаря отново за подсказката с отварянето на заявка в мрежата. „Преодолях“. :)) В една форма на PageFrame беше възможно да се покажат на страница1 резултатите на заявка с подобни фамилни имена и след това на страница2 да се "отворят" пълните данни на клиента, получени с помощта на изгледа VIEW (вече избран от кода на клиента) с възможност за редактиране и връщане към базата данни. (А-а-а, не го лъжете ) :-)))
Всичко най-хубаво! Т.А.Н.
Още ли си буден, Александър? Ами тогава здравейте!
07 май 05 17:40, Александър Тананаев написа на Игор Корольов:
IK>> И процесът не е фундаментално различен. IK>> oWord = CreateObject("Word.Application") IK>> oDoc = m.oWord.Documents.Open("Моят документ.doc") IK>> ? m.oDoc.Content.Text
AT> Много интересно. :)
AT> 1. В този пример VFP8 наслагва редове на документи AT> един на един. :(( Изглежда, че в примера знаците за превод AT> на реда са "изядени". При създаване на документ в Word, редът завършва с AT> .
Е, едно е как се показват на екрана. И това, което наистина има, е друго. Погледнете дадения ред в шестнадесетично представяне, добре, поне чрез ASC().
ЗА nCOUNT = 1 TO len(m.oDoc.Content.Text) ? SUBSTR(m.oDoc.Content.Text, nCount,1) && Показване на знак ??ASC(SUBSTR(m.oDoc.Content.Text, nCount)) && Показване на ANSI стойност ENDFOR
Най-вероятно има знак за връщане на каретка в началото на реда (chr(13) и символът за нов ред chr(10) липсва. Или лисицата не показва нещо подобно . Запазете го във файл и вижте там.
AT> 2. При повторно отваряне на файла „Моят документ.doc“ в Word, Word AT> предупреждава, че този документ се отваря само за четене. AT> IMHO, тогава потребителят ще задава ненужни въпроси. :) И той не AT> разбрах как да върна този документ в предишното му състояние.
Необходимо е поне да затворите документа Най-вероятно m.oDoc.Close() - не работи с Word.
И завинаги затворете приложението Word: oWord.Quit() или Exit() - потърсете себе си в помощта на VB към Word.
AT> 3. Къде мога да прочета повече за това? В Интернет в търсенето на реда "Word OLE Management".
Е, всички команди на Visual Basic на самия Word се възпроизвеждат от Fox през ole, само с подходящия синтаксис.
Е, Александър? За сега, нали?
. И тишина, и мъртвите с плитки стоят.