Имя: Пароль:
1C
1С v8
word только чтение
0 lordworld17
 
18.07.14
06:11
Word = Новый COMОбъект("Word.Application");
    
    Word.Documents.Open(ИмяФайла);
    Word.Application.ActiveDocument.Protect(2,ИСТИНА,"123",Ложь,ИСТИНА);//пароль на редактрование - код текущего объекта

    Word.Visible = 1;
    ДобавитьОбработчик Word.DocumentBeforeSave, ОбработкаСохраненияДокумента;
КонецПроцедуры

Процедура ОбработкаСохраненияДокумента(Doc, SaveAsUI, Cancel)
    Cancel = True;    
КонецПРоцедуры


нашел на мисте сей код для открытия word док для чтение.но осталась проблема.как убрать выскакивающее окно в документе с вопросом о сохранении изменений.может кто делал?поделитесь опытом.
1 Wobland
 
18.07.14
06:12
ексель вот имеет заклинание DisplayAlerts
2 skunk
 
18.07.14
06:21
как бы DisplayAlerts тут совсем не при чем
3 Wobland
 
18.07.14
06:24
(2) да? в такой редакции матерится

    //Excel.DisplayAlerts=0;
    Попытка
        Excel.Save();
    Исключение
        Сообщить(ОписаниеОшибки());
        Возврат;
    КонецПопытки;
4 skunk
 
18.07.14
06:26
ActiveDocument.Close(wdDoNotSaveChanges) - для документа

ну и тоже самое у Quit для всего ворда ... только он тогда все документы закроет ... поэтому надо проверять
5 skunk
 
18.07.14
06:29
(3)на что?
6 Wobland
 
18.07.14
06:33
(5) на что-то страшное. сохранить/нет? но не то, что редактировал ;)
7 skunk
 
18.07.14
06:40
при сохранении спрашивает тебя сохранить? ... извини не верю
8 Wobland
 
18.07.14
06:46
9 skunk
 
18.07.14
06:52
(8)ну колись, что ты сделал для того что-бы этого достичь?
10 skunk
 
18.07.14
06:53
на ум приходит только одно ... ты за каким-то аллахом пытаешься новый файл записать поверх старого
11 skunk
 
18.07.14
06:56
хотя для этого saveas нужон
12 Wobland
 
18.07.14
06:56
(10) есть такое, это ж отладка. c:\temp\00.xls уже давно там живёт ;)
правда, ни разу не понял, что за resume.xlw, ну да с DisplayAlerts=0 отрабатывает как надо
13 skunk
 
18.07.14
07:34
(12)меня это тоже насторожило ... но из того куска кода понять что там у тебя творится практически не возможно ... если нет коммерческой тайны сможешь скинуть свою обработку
14 Wobland
 
18.07.14
07:41
(13) отписался в почту
15 skunk
 
18.07.14
07:43
спасибо
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой