Пример, как обойтись без расширения работы с файлами в веб клиенте 8.2

01.11.10

Интеграция - WEB-интеграция

Меня достало, что в веб клиенте расширение работы с файлами задает много вопросов типа "Загрузить файл?" или "Удалить файл?". Долго искать альтернативу не пришлось.

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
РаботаСФайлами.epf
.epf 8,08Kb
156 2 500 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

Качайте обработку. Все должно быть понятно.

Принцип следующий:

Двоичные данные из макета кодируются в строку Base64. Затем кодируются обратно в формат понятный ADODB.Stream, с помощью которого и сохраняются на диск.

Удаление файла происходит средствами FileSystemObject.

 

Необходимые условия:

  • Браузер только Interrnet Explorer
  • Адрес веб сервера необходимо добавить в список надежных узлов
  • В параметрах безопасности надежных узлов разрешить "Доступ к источникам данных за пределами домена/Access data sources across domains" и "Использование элементов ActiveX, не помеченных как безопасные/Initialize and script ActiveX not marked as safe"
  • Согласиться, если браузер предложит установить компонент "Microsoft Script Control" 

Скачивая файл, Вы подтверждаете, что согласны получать информационные сообщения об этой программе.

Скачать "РаботаСФайлами.epf"

Размер: 8.08 kb
Доступ: Пользователи


+1

Поставьте плюс, если вы рекомендуете данную разработку к использованию.


См. также:
Мои разработки
Мои статьи

Отблагодарить меня:

Отправить 100 WMR (R342458610221)

Вступайте в нашу телеграмм-группу Инфостарт

См. также

WEB-интеграция Загрузка и выгрузка в Excel Программист Пользователь 1С:Предприятие 8 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 Розничная и сетевая торговля (FMCG) Россия Платные (руб)

Расширение освободит вас от необходимости вручную обновлять товары в группах ВКонтакте. Достаточно задать правила один раз, и система автоматически синхронизирует ваш каталог. Вы сможете легко выбирать, какие товары публиковать, создавая гибкие критерии отбора. Например, можно добавить важные для покупателей параметры: цвет, размер или другие характеристики.

12200 руб.

29.08.2025    1618    4    0    

4

WEB-интеграция Программист Бизнес-аналитик 1С:Предприятие 8 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Оптовая торговля, дистрибуция, логистика ИТ-компания Платные (руб)

Модуль "Экспортер" — это расширение для 1С, предназначенное для автоматизации процессов выгрузки данных. Оно позволяет эффективно извлекать, преобразовывать и передавать данные из систем 1С в интеграционную платформу Spot2D. Подсистема упрощает настройку, снижает количество ручных операций и обеспечивает удобный контроль данных.

17568 руб.

20.12.2024    5257    22    4    

24

WEB-интеграция Анализ продаж Системный администратор Программист Пользователь 1С:Предприятие 8 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Управленческий учет Платные (руб)

Модуль "Подсистема интеграции AmoCRM с 1С" позволяет обеспечить единое информационное пространство, в котором пользователи могут эффективно управлять клиентской базой, следить за статусами сделок и поддерживать актуальность данных как в AmoCRM, так и в 1С.

60000 руб.

07.05.2019    41218    75    45    

31

WEB-интеграция Программист 1С:Предприятие 8 1С:Бухгалтерия 3.0 Бытовые услуги, сервис Платные (руб)

Расширение для автоматизации передачи данных между сервисом Vetmanager с 1С: Бухгалтерия 3.0. Решение позволяет загружать документы и справочники из Ветменеджер в 1С:Бухгалтерию, сокращая время на ручной ввод данных и минимизируя ошибки.

24000 руб.

02.02.2021    21816    62    52    

40

Обмен с ГосИС WEB-интеграция Бухгалтер Пользователь 1С:Предприятие 8 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия государственного учреждения 1С:Документооборот 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Платные (руб)

Обработка является альтернативой механизму, разработанному фирмой 1С и заполняющему реквизиты контрагента по ИНН или наименованию. Не требуется действующей подписки ИТС. Вызывается как внешняя дополнительная обработка, т.е. используется, непосредственно, из карточки контрагента. Заполнение по ИНН или наименованию реквизитов контрагента по данным сайта ФНС (egrul.nalog.ru) для БП 2.0, БП 3.0, БГУ 1.0, БГУ 2.0, УТ 10.3, УТ 11.x, КА 1.1, КА 2.x, УПП 1.x, ERP 2.x, УНФ 1.5, УНФ 1.6, УНФ 3.0, ДО 2.1

5283 руб.

28.04.2016    99932    116    219    

364
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. artbear 1586 01.11.10 17:33 Сейчас в теме
Хорошо, но допущения уж слишком сильные :)
2. Armando 1402 01.11.10 17:50 Сейчас в теме
(1) Согласен. Возможно кто-то пойдет на такие жертвы. Для облегчения жизни можно сварганить reg файл с настройками.
4. Steelvan 315 03.09.11 13:56 Сейчас в теме
#Если НЕ ВебКлиент тогда
ФайлЗагр = Новый Файл(Файл);
Если ФайлЗагр.Существует() = Ложь Тогда
ТекстСообщения = НСтр("ru = 'Файла %Файл% не существует!'");
ТекстСообщения = СтрЗаменить(ТекстСообщения, "%Файл%", Файл);
УправлениеНебольшойФирмойСервер.СообщитьОбОшибке(, ТекстСообщения);
Возврат Неопределено;
КонецЕсли;
#КонецЕсли

ПотокЧтения = Новый ТекстовыйДокумент();

Попытка
Если Объект.Кодировка = "DOS" Тогда
Кодир = КодировкаТекста.OEM;
Иначе
Кодир = КодировкаТекста.ANSI;
Конецесли;
ПотокЧтения.Прочитать(Файл, Кодир);
Исключение
ТекстСообщения = НСтр("ru = 'Файл не прочитан.'");
УправлениеНебольшойФирмойСервер.СообщитьОбОшибке(, ТекстСообщения);
Возврат Неопределено;
КонецПопытки;

Если ПотокЧтения.КоличествоСтрок() < 1 Тогда
ТекстСообщения = НСтр("ru = 'В файл нет данных!'");
УправлениеНебольшойФирмойСервер.СообщитьОбОшибке(, ТекстСообщения);
Возврат Неопределено;
КонецЕсли;

Если СокрЛП(ПотокЧтения.ПолучитьСтроку(1)) <> "1CClientBankExchange" Тогда
ТекстСообщения = НСтр("ru = 'Указанный файл не является файлом обмена или неверно указана кодировка!'");
УправлениеНебольшойФирмойСервер.СообщитьОбОшибке(, ТекстСообщения);
Возврат Неопределено;
КонецЕсли;

Возврат ПотокЧтения.ПолучитьТекст();
3. madvik 31.01.11 19:10 Сейчас в теме
Очень интересная реализация, может у вас есть обработка по обратной загрузке файла с клиента на сервер?
Столкнулись с проблемой, из-за которой не можем использовать стандартное расширение работы с файлами...
5. opolyakova 16 03.11.11 15:26 Сейчас в теме
платформу поновее, и закомментить код. у меня работает..
6. FB_2710863099162156 07.10.20 13:05 Сейчас в теме
как тут скачать? можно на мыло мне отправить?
Для отправки сообщения требуется регистрация/авторизация