ИмяZIPФайла = ПолучитьИмяВременногоФайла(".zip"); ФайлАрхива = Новый ЗаписьZipФайла(ИмяZIPФайла, , , МетодСжатияZIP.Сжатие, УровеньСжатияZIP.Оптимальный); ФайлАрхива.Добавить(ИмяВременногоФайла, РежимСохраненияПутейZIP.СохранятьОтносительныеПути, РежимОбработкиПодкаталоговZIP.ОбрабатыватьРекурсивно); ФайлАрхива.Записать();
Работа с Файлами и Каталогами
Работа с Файлами и Каталогами
Функция Удаляет указанные файлы. УдалитьФайлы(<Путь>, <Маска>) Параметры: <Путь> (обязательный) Тип: Строка. Путь к удаляемым файлам. <Маска> (необязательный)...
В 8-ых версий нет встроенной функции получения каталога базы данных, так напишем ее, //Получить представление информационной базы...
Для того чтобы записать файлы в ZIP-архив необходимо выполнить несколько простых действий: * Создать архив с необходимыми...
// ПутьКФайлу - Строка - путь к файлу или каталогу, существование которого // нужно проверить. // //...
Для того чтобы прочитать файлы из ZIP-архива необходимо выполнить несколько простых действий: — Открыть необходимый архив —...
// ПутьКФайлу – Строка – путь к файлу. // // Возвращаемое значение: // Строка – каталог файла...
При работе с большими объемами данных могут возникнуть проблемы при пересылке архивных файлов. Типичной такой ситуацией является...
//Возвращает Истина - скопирован, иначе Ложь Функция СкопироватьФайл(ИмяФайлаИсточник, ИмяФайлаНазначение, ВыдаватьСообщения = Ложь) Экспорт Попытка ПозицияСимвола = СтрДлина(ИмяФайлаНазначение);...
Процедура НайтиФайлыПоПодпапкам(НайденныеФайлы, Каталог, Маска) Если НайденныеФайлы = Неопределено Тогда НайденныеФайлы = Новый Массив; КонецЕсли; Путь = Каталог;...
// Размер – Число – размер в байтах // // Возвращаемое значение: // Строка – строковое представление...
//На форме есть поле (Путь к файлу), для кнопки Выбор (Событие начало выбора) пропишем процедуру выбора файла...
Режим = РежимДиалогаВыбораФайла.Открытие; ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(Режим); ДиалогОткрытияФайла.ПолноеИмяФайла = ""; Фильтр = "Текст(*.txt)|*.txt"; ДиалогОткрытияФайла.Фильтр = Фильтр; ДиалогОткрытияФайла.МножественныйВыбор...
Режим = РежимДиалогаВыбораФайла.Сохранение; ДиалогСохраненияФайла = Новый ДиалогВыбораФайла(Режим); ДиалогСохраненияФайла.ПолноеИмяФайла = "Выгрузка_"+Формат(ПериодРегистрации,"ДФ=M_yy"); Фильтр = "Текст(*.txt)|*.txt"; ДиалогСохраненияФайла.Фильтр = Фильтр; ДиалогСохраненияФайла.МножественныйВыбор...
Функция ПолучитьДатуФайла(Знач ИмяФайла) Экспорт Файл = Новый Файл(ИмяФайла); Возврат Файл.ПолучитьВремяИзменения(); КонецФункции
ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие); ДиалогОткрытияФайла.Выбрать(); Файл = Новый Файл(ДиалогОткрытияФайла.ПолноеИмяФайла); Текст = "Файл: " + Файл.Имя; Текст =...
// Функция выделяет из имени файла его расширение // // Параметры // ИмяФайла – Строка, содержащая имя...
Режим = РежимДиалогаВыбораФайла.ВыборКаталога; ДиалогОткрытия = Новый ДиалогВыбораФайла(Режим); ДиалогОткрытия.Каталог = ""; ДиалогОткрытия.МножественныйВыбор = Ложь; ДиалогОткрытия.Заголовок = "Выберите каталог";...
//Функция Проверяет наличие каталога на диске и предлагает создать, если каталога не существует. // // Параметры //...
Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие); Диалог.Заголовок = "Выберите файл"; Диалог.ПолноеИмяФайла = ""; Фильтр = "Все файлы (*.*)|*.*"; Диалог.Фильтр...