Имя: Пароль:
1C
1С v8
v8: Работа с архиватором зип.
0 Маленький Вопросик
 
20.09.12
11:36
Помогите исправить косяк:

&НаСервере
Функция СформироватьПКОРКО(ПутьСохранения)
   
   ИмяФайлаБД = КаталогВременныхФайлов()+"pkorko.dbf";
   
   БД = Новый XBase;
   БД.Кодировка = КодировкаXBase.OEM;
       БД.АвтоСохранение = Истина;

   БД.Поля.Добавить("NOMER", "S", 11);        //номер документа
   БД.Поля.Добавить("DATE", "D", 11);        //дата документа
   
   
   БД.СоздатьФайл(ИмяФайлаБД); //создаем файл ПКО-шников во временном хранилище
   
   Для Каждого Стр из Объект.ПКОшники Цикл
       
       Если Стр.Загружать = Истина Тогда
       
           БД.Добавить();
           
           БД.NOMER = Стр.СсылкаДок.Номер;
           БД.DATE = Стр.СсылкаДок.Дата;
               
           
       КонецЕсли;    
       
   КонецЦикла;
   
   БД.ЗакрытьФайл();    
   
   АрхивПКОРКО = Новый ЗаписьZipФайла("pkorko.zip", "", "Тест");
   АрхивПКОРКО.Добавить(ИмяФайлаБД);
   АрхивПКОРКО.Записать();

   Возврат ПоместитьВоВременноеХранилище(Новый ДвоичныеДанные(АрхивПКОРКО));
   
КонецФункции


на сервере пытаюсь заархивировать выборку в dbf и отправить в хранилище...
но ругается блин!!! говорит файл не найден! "ЗаписьZipФайла"

подскажите как исправить
1 Валерьевна
 
20.09.12
11:40
может слэша не хватает?
КаталогВременныхФайлов()+"\pkorko.dbf";
2 Маленький Вопросик
 
20.09.12
11:41
(1) со слешем не канает тоже(((
3 Птах
 
20.09.12
11:44
по шагам отладить не судьба?
4 Маленький Вопросик
 
20.09.12
11:45
(3) ссылается на "ЗаписьZipФайла" - говорит нет файла какого-то
5 Птах
 
20.09.12
11:48
(4) А путь?
6 Птах
 
20.09.12
11:50
и вообще, почитай СП )

Параметры:
<ИмяФайла> (обязательный)
Тип: Строка. Имя файла, помещаемого в архив
7 Маленький Вопросик
 
20.09.12
11:55
(6) ну и что у меня не так?
8 0Mint
 
20.09.12
11:56
(7)
АрхивПКОРКО = Новый ЗаписьZipФайла(стрПутьКПапке+"pkorko.zip", "", "Тест");
9 Маленький Вопросик
 
20.09.12
12:02
&НаСервере
Функция СформироватьПКОРКО(ПутьСохранения)
   ИмяФайлаБД = КаталогВременныхФайлов()+"pkorko.dbf";
   БД = Новый XBase;
   БД.Кодировка = КодировкаXBase.OEM;
       БД.АвтоСохранение = Истина;
       БД.Поля.Добавить("NOMER", "S", 11);        //номер документа
   БД.Поля.Добавить("DATE", "D", 11);        //дата документа
   БД.СоздатьФайл(ИмяФайлаБД); //создаем файл ПКО-шников во временном хранилище
   Для Каждого Стр из Объект.ПКОшники Цикл
       Если Стр.Загружать = Истина Тогда
           БД.Добавить();
           БД.NOMER = Стр.СсылкаДок.Номер;
           БД.DATE = Стр.СсылкаДок.Дата;
       КонецЕсли;    
   КонецЦикла;
   БД.ЗакрытьФайл();    
   
   Сообщить("111");
   
   АрхивПКОРКО = Новый ЗаписьZipФайла("c:\1\pkorko1.zip", "", "Тест");
   АрхивПКОРКО.Добавить(ИмяФайлаБД, РежимСохраненияПутейZIP.СохранятьОтносительныеПути);
   АрхивПКОРКО.Записать();

   
   Возврат ПоместитьВоВременноеХранилище(Новый ДвоичныеДанные(АрхивПКОРКО));
10 Маленький Вопросик
 
20.09.12
12:02
не работает нифига....
11 Маленький Вопросик
 
20.09.12
12:03
зип в системе должен быть установлен?
12 Маленький Вопросик
 
20.09.12
12:08
все получилось!!!! спасибо всем
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший