Ошибка!!! Не могу добить обработку)) Подскажите!!!
Привет! С одним файлом все получилось. Сейчас добавляю цикл
И в процедуре ЗагрузитьДанныеИзФайла выскакивает ошибка. Подскажите как исправить
.{ВнешняяОбработка.Разбиениебиллинга.Форма.Форма.Форма(32)}: Ошибка при вызове метода контекста (КопироватьФайл)
КопироватьФайл(КаталогБиллинг,НашПолныйПутьФайла);
по причине:
Ошибка копирования файлов
по причине:
Ошибка копирования файлов из 'D:\Gu\З\Разбиение\Сб\2019_11' в 'C:\Users\f071\AppData\Local\Temp\2019_11.dbf' : Ошибка доступа к файлу
....... ..........
ПОКА ПИСАЛ УВИДЕЛ ОШИБКУ, А подскажите тогда как мне указать имя файлов из цикла в Процедура ЗагрузитьДанныеИзФайла() если КаталогБиллинг я указываю каталог с файлами?
&НаКлиенте
Процедура Загрузить(Команда)
НайденныеФайлы = НайтиФайлы(КаталогБиллинг, "*.dbf");
Для Каждого ф из НайденныеФайлы Цикл
ЗагрузитьДанныеИзФайла();
КонецЦикла;
КонецПроцедуры
И в процедуре ЗагрузитьДанныеИзФайла выскакивает ошибка. Подскажите как исправить
.{ВнешняяОбработка.Разбиениебиллинга.Форма.Форма.Форма(32)}: Ошибка при вызове метода контекста (КопироватьФайл)
КопироватьФайл(КаталогБиллинг,НашПолныйПутьФайла);
по причине:
Ошибка копирования файлов
по причине:
Ошибка копирования файлов из 'D:\Gu\З\Разбиение\Сб\2019_11' в 'C:\Users\f071\AppData\Local\Temp\2019_11.dbf' : Ошибка доступа к файлу
&НаКлиенте
Процедура ЗагрузитьДанныеИзФайла()
ПутьКФайлу = Новый Файл(КаталогБиллинг);
НашеИмяФайла = Лев(ПутьКФайлу.ИмяБезРасширения,8)+".dbf";
НашПолныйПутьФайла = КаталогВременныхФайлов()+НашеИмяФайла;
КопироватьФайл(КаталогБиллинг,НашПолныйПутьФайла);
ФайлДБФ = Новый XBase;
ФайлДБФ.ОткрытьФайл(НашПолныйПутьФайла,,Истина);
ФайлДБФ.Первая();
Реквизит1.Очистить();
Пока НЕ ФайлДБФ.ВКонце() Цикл
Показать....... ..........
ПОКА ПИСАЛ УВИДЕЛ ОШИБКУ, А подскажите тогда как мне указать имя файлов из цикла в Процедура ЗагрузитьДанныеИзФайла() если КаталогБиллинг я указываю каталог с файлами?
По теме из базы знаний
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот