0
FReIM
11.04.13
✎
12:57
|
Модуль выполняется в регламентном задании на сервере 1с.
В толстом клиенте естественно все в порядке.
Но на сервере при выполнении кода
ЗаписьЖурналаРегистрации("Получаем макет",
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
Уведомление = ПолучитьМакет("МакетВорд2");
ИмяВремФайла="C:\1ctemp\"+Прав(ПолучитьимяВременногоФайла(".doc"),14);
Уведомление.Записать(ИмяВремФайла);
ЗаписьЖурналаРегистрации("Получаем приложение "+ТипЗнч(Уведомление),
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
MSWord = Новый COMОбъект("Word.Application");
//MSWord = Уведомление.Получить();
ЗаписьЖурналаРегистрации("Получаем Документ "+ТипЗНЧ(MSWord),
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
MSWordApp=MSWord.Application;
ЗаписьЖурналаРегистрации("Получаем Word Application "+ТипЗНЧ(MSWordApp),
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
MSWordApp.Visible = True;
Документ = MSWordApp.Documents.OpenNoRepairDialog(ИмяВремФайла);
ЗаписьЖурналаРегистрации("Открыт Документ "+ТипЗНЧ(Документ)+" количество документов "+MSWordApp.Documents.Count,
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
Документ=MSWordApp.ActiveDocument;
ЗаписьЖурналаРегистрации("Активизирован Документ "+ТипЗНЧ(Документ),
УровеньЖурналаРегистрации.Ошибка,
,
ТекущаяДата(),
ОписаниеОшибки());
Получаем такую вот ошибку.
Открыт Документ Не определено количество документов 0
{ВнешняяОбработка.ОповещениеОбОтпуске.МодульОбъекта(69)}: Ошибка при получении значения атрибута контекста (ActiveDocument): Произошла исключительная ситуация (Microsoft Word): Данная команда недоступна, так как не открыт ни один документ.
Собственно как видно из листинга. Нет открытых документов методы open и OpenNoRepairDialog по каким-то странным причинам не отрабатывают.
|
|