#include "Word_2K_SRVR.h"
#include[list=1]
Variant ReplaceType = wdReplaceAll;
Variant XL, WD, WDoc, WS;
try
{
WD = Variant::GetActiveObject("Word.Application");
}
catch(...)
{
WD = Variant::CreateObject("Word.Application");
}
WD.OlePropertySet("Visible", True);
WD.OlePropertyGet("Documents").OleProcedure("Open", StringToOleStr("c:\\file.doc"));
WDoc = WD.OlePropertyGet("ActiveDocument");
WDoc.OleFunction("Range").OlePropertyGet("Find").OleProcedure("Execute", StringToOleStr("Старая строка"),
EmptyParam, EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam, EmptyParam,
StringToOleStr("Новая строка"), ReplaceType);
WDoc.OleFunction("Save");
Как сделать поиск и замену из BC++B в док. Word?
Достопочтимые джентльмены!
Я наверное очень тупой, но у меня не получается решение задачи по нахождению фрагмента в документе word ( не в таблице) и его замена через OLE automation.
Я плохо понимаю синтаксис OLE, по моему он не совсем детерминирован.
Does somebody help me?
С уважением,
Вадим
Я наверное очень тупой, но у меня не получается решение задачи по нахождению фрагмента в документе word ( не в таблице) и его замена через OLE automation.
Я плохо понимаю синтаксис OLE, по моему он не совсем детерминирован.
Does somebody help me?
С уважением,
Вадим
Цитата:
Originally posted by ivad
Достопочтимые джентльмены!
Я наверное очень тупой, но у меня не получается решение задачи по нахождению фрагмента в документе word ( не в таблице) и его замена через OLE automation.
Я плохо понимаю синтаксис OLE, по моему он не совсем детерминирован.
Does somebody help me?
С уважением,
Вадим
Достопочтимые джентльмены!
Я наверное очень тупой, но у меня не получается решение задачи по нахождению фрагмента в документе word ( не в таблице) и его замена через OLE automation.
Я плохо понимаю синтаксис OLE, по моему он не совсем детерминирован.
Does somebody help me?
С уважением,
Вадим
Код: