antarey Опубликовано 18 декабря, 2019 Поделиться Опубликовано 18 декабря, 2019 (изменено) Добрый день. Помогите побороть OLE сервер ворда. Есть простая задача - открыть документ ворд и сохранить его в html, но что-то лыжи не едут Вот код unit1.h public: // User declarations Variant vVarApp,vVarDocs; bool fStart; unit1.cpp #include <ComObj.hpp> #include <utilcls.h> if (!fStart) { try { vVarApp = CreateOleObject("Word.Application"); fStart = true; vVarDocs = vVarApp.OlePropertyGet("Documents"); vVarDocs.OleProcedure("ChangeFileOpenDirectory", "\"D:\\\""); vVarDocs.OleProcedure("Open", "f1.docx"); vVarApp.OlePropertySet("Visible", true); } catch (...) { ShowMessage("Ошибка при открытии сервера Word"); return; } } И получаю ошибку - Unknown name Изменено 18 декабря, 2019 пользователем antarey Цитата Ссылка на комментарий
0 antarey Опубликовано 18 декабря, 2019 Автор Поделиться Опубликовано 18 декабря, 2019 Документ открываю, но сохранять в упор не хочет vVarApp = CreateOleObject("Word.Application"); fStart = true; vVarApp.OlePropertySet("Visible", true); vVarDocs = vVarApp.OlePropertyGet("Documents"); vVarDocs.OleProcedure("Open",WordFileName); vVarDocs=vVarDocs.OleFunction("Item",1); vVarDocs.OleProcedure("Activate"); vVarApp.OlePropertyGet("ActiveDocument").OleProcedure(L"SaveAs2", HtmlFileName, L"FileFormat:=_wdFormatFilteredHTML"); vVarApp.OlePropertyGet("ActiveWindow").OleProcedure(L"Close"); vVarApp.OleProcedure("Quit"); Точнее сохраняет, но не в _wdFormatFilteredHTML формате Цитата Ссылка на комментарий
0 Ingalime Опубликовано 18 декабря, 2019 Поделиться Опубликовано 18 декабря, 2019 Может не в тему, но не понятно почему здесь двоеточие? Это не синтаксис С++ L"FileFormat:=_wdFormatFilteredHTML" Цитата Ссылка на комментарий
0 antarey Опубликовано 18 декабря, 2019 Автор Поделиться Опубликовано 18 декабря, 2019 Етот параметр передается в ворд.Ето переделка кода VBA. Цитата Ссылка на комментарий
Вопрос
antarey
Добрый день.
Помогите побороть OLE сервер ворда.
Есть простая задача - открыть документ ворд и сохранить его в html, но что-то лыжи не едут
Вот код
unit1.h
unit1.cpp
И получаю ошибку - Unknown name
Изменено пользователем antareyСсылка на комментарий
3 ответа на этот вопрос
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.