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

01.11.10

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

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

Файлы

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

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

Подписка 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-интеграция 1С:Управление торговлей 10 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Платные (руб)

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

57600 руб.

26.11.2024    6351    4    3    

7

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

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

14400 руб.

20.12.2024    3651    17    2    

19

Сайты и интернет-магазины WEB-интеграция Системный администратор Программист Пользователь 1С v8.3 1C:Бухгалтерия 1С:Управление торговлей 11 Автомобили, автосервисы Россия Управленческий учет Платные (руб)

Интеграционный модуль обмена между конфигурацией Альфа Авто 5 и Альфа Авто 6 и порталом AUTOCRM. Данный модуль универсален. Позволяет работать с несколькими обменами AUTOCRM разных брендов в одной информационной базе в ручном и автоматическом режиме.

36000 руб.

03.08.2020    21423    29    24    

24

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

В расширении реализован механизм интеграции между системой поставщика и Личным кабинетом СДТ. Реализован обмен заказами и реализациями (накладными), предусмотрено отслеживание статусов документов. Расширение предназначено для 1С:УТ 11.4.

35856 руб.

27.11.2024    1975    1    0    

1

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

Обмен данными с "Порталом поставщиков" zakupki.mos.ru Москвы и Московской области с целью создания оферт для закупок государственными учреждениями. Модуль устраняет рутину, минимизирует ошибки и помогает выигрывать больше закупок. Работает строго по требованиям 44-ФЗ.

14400 руб.

13.12.2016    41054    54    39    

37

WEB-интеграция Программист 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 Бытовые услуги, сервис Платные (руб)

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

12000 руб.

02.02.2021    20418    59    52    

36
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. artbear 1576 01.11.10 17:33 Сейчас в теме
Хорошо, но допущения уж слишком сильные :)
2. Armando 1402 01.11.10 17:50 Сейчас в теме
(1) Согласен. Возможно кто-то пойдет на такие жертвы. Для облегчения жизни можно сварганить reg файл с настройками.
4. Steelvan 311 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 Сейчас в теме
как тут скачать? можно на мыло мне отправить?
Для отправки сообщения требуется регистрация/авторизация