Имя: Пароль:
1C
1С v8
проблема с MS Word не сохраняет файл из 1С SaveAS
0 Baloven
 
27.11.11
12:16
столкнулься с такой проблемой есть кусок кода на одном коме не работающий :( (именно на одном):


   Файлы = НайтиФайлы(ИмяКаталога,"Договор юриста " + Формат(ДатаОкончанияРасчета-604800, "ДФ=""дд ММММ гггг 'г.'""") +".docx",Ложь);
   Если Файлы.Количество() = 0 Тогда
       Макет = ПолучитьМакет("ДоговорНаЮрУслуги");
       КомОбъект = Макет.Получить();                    
       КомОбъект.Variables.Item("ДатаДоговора").Value = Формат(ДатаОкончанияРасчета-604800, "ДФ=""дд ММММ гггг 'г.'""");
       КомОбъект.Variables.Item("ФИОКонтрагента").Value = КонтрагентФИОРодительный;
       КомОбъект.Variables.Item("АдресКонтрагент").Value = ЭлементыФормы.Улица.Значение + ", д. " + ЭлементыФормы.Дом.Значение + ", кв. " + ЭлементыФормы.Квартира.Значение;
       КомОбъект.Fields.UpDate();
       КомОбъект.SaveAS(ИмяКаталога + "\Договор юриста " + Формат(ДатаОкончанияРасчета-604800, "ДФ=""дд ММММ гггг 'г.'""") +".docx",16);
       КомОбъект.Application.Visible = True;
       КомОбъект.Application.Quit();
       КомОбъект = 0;
       Макет = 0;
   КонецЕсли;

... не могу понять на других компах все ОК работает. а на этом не создает файл (или не сохраняет) в чем может быть трабл?
1 Baloven
 
27.11.11
12:19
... PS переменные все действительны на проблемном компе - и ошибок не выдает никаких - просто не создает файл, можно ли как-то задать в данной конструкции проверку и выловить хотябы номер ошибки почему не сохраняет? (файл сохраняет на сеть, разрешения вроде все есть) :( уже голову сломал что с ним не так :(
2 ДенисЧ
 
27.11.11
12:20
А если не на сеть? сохраняет?
3 Baloven
 
27.11.11
12:22
... думаю что ошибка в другом... щас как раз пробую
4 Baloven
 
27.11.11
12:25
.... сорри локально все сохраняет - пошел доступы лопатить.... извиняюсь
5 Baloven
 
27.11.11
12:27
PS код:
       КомОбъект.Fields.UpDate();
       КомОбъект.SaveAS(ИмяКаталога + "\Договор юриста " + Формат(ДатаОкончанияРасчета-604800, "ДФ=""дд ММММ гггг 'г.'""") +".docx",16);

заменил на:


       КомОбъект.Fields.UpDate();
       ИмяКаталога = "D:\123";
       КомОбъект.SaveAS(ИмяКаталога + "\Договор юриста " + Формат(ДатаОкончанияРасчета-604800, "ДФ=""дд ММММ гггг 'г.'""") +".docx",16);

Тем самым выявив, что проблема не в 1С...
6 Baloven
 
28.11.11
03:14
Ничего не могу понять - с разрешениями все нормально. однако из обработки именно вордовские документы не хочет сохранять по сетевому расположению, локально с сохранением все нормально и с вордом тоже
7 Baloven
 
28.11.11
03:15
в этой же обработке сохраняются и ексельные файлы - с ними все нормально и только на одном компе, пакет офиса уже переустановил на нем - все равно то же самое
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn