Имя: Пароль:
1C
1С v8
Подскажите почему так происходит
0 espanol
 
26.10.12
12:03
В тонком клиенте работает нормально, с первого раза открывается эксельник, а в толстом не хочет, код одинаковый:

   Путь     = Константы.ПутьКШаблонам.Получить() + "\" + "пропуск.xls";
   Excel    = Новый COMОбъект("Excel.Application");
   Книга    = Excel.WorkBooks.Add(Путь);
   Лист     = Книга.WorkSheets(1);
   ВремФайл = ПолучитьИмяВременногоФайла("xls");
   
   СтруктураПараметров        = ПолучитьДополнительныеПараметры();
   СтруктураПараметровОбъекта = СтруктураПараметровОбъекта();
   
   //строка, колонка
   Лист.Cells(2,2).Value = СокрЛП(СтруктураПараметровОбъекта.VIN);
   Лист.Cells(3,2).Value = Формат(ТекущаяДата(), "ДЛФ=DD");
   Лист.Cells(5,2).Value = Автор.Наименование;
   Лист.Cells(6,2).Value = Менеджер.Наименование;
   Лист.Cells(7,2).Value = ПодписантДокумента.НаименованиеПолное;
   
   Лист.Cells(2,3).Value = СокрЛП(СтруктураПараметровОбъекта.VIN);
   Лист.Cells(3,3).Value = Формат(ТекущаяДата(), "ДЛФ=DD");
   Лист.Cells(5,3).Value = Автор.Наименование;
   Лист.Cells(6,3).Value = Менеджер.Наименование;
   Лист.Cells(7,3).Value = ПодписантДокумента.НаименованиеПолное;
   
   Книга.SaveAs(ВремФайл, -4143);//FileFormatNum
   Excel.WorkBooks.Close();
   Excel.Quit();
   Excel = Неопределено;
   Адрес = ПоместитьВоВременноеХранилище(Новый ДвоичныеДанные(ВремФайл));
   УдалитьФайлы(ВремФайл);
   
   ВремФайл = ПолучитьИмяВременногоФайла("xls");
   Данные   = ПолучитьИзВременногоХранилища(Адрес);
   Данные.Записать(ВремФайл);
   УстановитьРасширениеРаботыСФайлами();
   ПодключитьРасширениеРаботыСФайлами();
   ЗапуститьПриложение(ВремФайл);
1 Ayvengo
 
26.10.12
12:03
(0) а текст ошибки?
2 espanol
 
26.10.12
12:03
В толстом начинает открывается только если первый раз вручную запустить эксельник, закрыть его, потом начинает запускаться из 1С нормально...
3 espanol
 
26.10.12
12:04
(1) нет ошибки
4 Ayvengo
 
26.10.12
12:04
(0) серверный вариант базы или файловый?
5 espanol
 
26.10.12
12:05
(4) серверный
6 Ayvengo
 
26.10.12
12:08
(0) а файл создается, существует? Добавить проверку и сообщение о несуществовании файла :)
7 espanol
 
26.10.12
12:13
(6) да, создается и существует
8 espanol
 
26.10.12
12:14
если точной останова дойти до сюда: ЗапуститьПриложение(ВремФайл);

Можно увидеть полный путь и вручную запустить его.
9 Ayvengo
 
26.10.12
12:14
(7) попробуй на другой машине проделать тоже самое.
10 espanol
 
26.10.12
12:17
(9) я хз че произашло, но перезапустив раз 10 1С-ку начало все нормально работать...
11 Ayvengo
 
26.10.12
12:17
(10) один Эс она такая :D