Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.08.03;
Скачать: [xml.tar.bz2];

Вниз

поиск в WORD   Найти похожие ветки 

 
zdm77   (2008-07-03 10:03) [0]

Добрый день. Необходимо организовать поиск по WORD документу, при нахождении ключевого слова пропустить две строки и вносить данные в БД. Ключевое слово-заголовок таблицы, повторяющейся на каждом листе. В связи с этим три вопроса.
1. Как искать до конца документа? ..что сделал приведу ниже, не могу понять как организовать цикл до конца документа.
2. Как пропустить две строки (чтото вроде ReadLN)
3. Как выделить от когото символа n кол-во знаков (чтото вроде функции "copy")

var  
 wd:OleVariant;
begin
 wd:=CreateOleObject("Word.Basic");
 wd.FileOpen("путь к файлу");
 wd.EditFind("Серия");
 //для проверки нахождения
if wd.EditFindFound  then showmessage(""); //вот тут как организовать поиска до конца документа? это к первому вопросу
end;


 
zdm77   (2008-07-03 10:05) [1]

первый вопрос снимаю, пока писал догнал сам :) извините. Ответьте пожалуйста на 2 и 3


 
zdm77   (2008-07-03 10:36) [2]

или хотябы дайте ссылки где грамотно расписаны методы работы с OLE касаемо WORD.


 
saNat ©   (2008-07-03 11:49) [3]

такого делать не приходилось, но всегда делал макрос и потом смотрел  его текст. обычно хватало...


 
Johnmen ©   (2008-07-03 11:58) [4]

http://sql.ru/forum/actualthread.aspx?tid=572767



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2008.08.03;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.008 c
2-1214549615
matriza
2008-06-27 10:53
2008.08.03
преобразовать doc и xls в pdf


6-1191397323
Gydvin
2007-10-03 11:42
2008.08.03
Узнать IP


15-1213735378
No_Dead
2008-06-18 00:42
2008.08.03
Разве это законно?


2-1214886949
DJ_UZer
2008-07-01 08:35
2008.08.03
Как считать текстовый файл из интерната


15-1213783775
Алекс
2008-06-18 14:09
2008.08.03
С использ чего писать БД





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский