QR-code полная версия (без шрифта и внешней компоненты для 8.2, 8.3 и любого типа клиента)

21.11.2018 6 Comments

Разработка, Разработка внешних компонент

,


    scr1.png
    scr2.png
Предназначена для создания QR-code с указанием процента восстановления потерянных данных.
Строка кодирования может содержать все печатаемые символы, в том числе и кириллические. Для работы не требуется внешняя компонента или шрифт.

В отличие от предыдущей публикации //infostart.ru/public/137919/ повышено быстродействие (благодаря использованию javascipt), исправлены ошибки и теперь бесплатно доступны все версии QR-кода с 1 по 40.

Можно использовать, как в 1С:Предприятии, так и в других Windows-приложениях, у которых есть возможность запуска скриптов на основе Windows Script Host (WSH/javascript).

В архиве присутствуют два файла: "qr.js" — собственно сам скрипт, который создает bmp-файл с изображением qr-кода и внешняя обработка "QRcodeJS.epf" для 1С:Предприятия 8.2, 8.3, которая хранит в себе выше указанный скрипт и создает табличный документ с изображением qr-кода.

Для самостоятельного запуска скрипта необходимо передать ему входные параметры, количество и последовательность которых должны быть неизменными:
 — процент восстановления, значение от 0 до 3 (0 — L(7%), 1 — M(15%), 2 — Q(25%), 3 — H(30%));
 — кодируемая строка (в кавычках при наличии пробелов);
 — путь к BMP-файлу-результату (в кавычках при наличии пробелов).
Например:

 wscript qr.js 0 "This is My string for QR" d:qrcodesqr1.bmp

или

 qr.js 3 "//infostart.ru/public/835078/" "d:qrcodesqr2.bmp"

Для запуска в 1С:Предприятии 8.2,8.3 достаточно открыть внешнюю обработку, указать процент восстановления, ввести строку для кодирования и нажать на кнопку создания.

Работоспособность на читаемость QR-кода проверялась с использованием бесплатной программы QuickMark (http://www.quickmark.com.tw/En/basic/index.asp).

Платформа 1С:Предприятие 8.3.10.2650, но это не ограничение, будет работать и на предыдущих и на 8.2.

Related Posts

6 Comments

  1. simonovich

    // Кириллица подключилась с пол-пинка. Просто нужно передавать строку в UTF8

    //Только что проверил. Работает.

    //Функция взята здесь: https://forum.infostart.ru/forum9/topic85119/

    //—————————————
Функция UTF8(Стр)
Длина=СтрДлина(Стр);
Итог=»»;
Для Н=1 По Длина Цикл
Знак=Сред(Стр,Н,1);
Код=КодСимвола(Знак);
Если Код<128 Тогда
Итог=Итог+Знак;
Иначе
Если (Код>=КодСимвола(«А»))И(Код<=КодСимвола(«п»)) Тогда
Итог=Итог+Символ(208)+Символ(144+Код-КодСимвола(«А»));
ИначеЕсли (Код>=КодСимвола(«р»))И(Код<=КодСимвола(«я»)) Тогда
Итог=Итог+Символ(209)+Символ(128+Код-КодСимвола(«р»));
ИначеЕсли (Знак=»ё») Тогда
Итог=Итог+Символ(209)+Символ(145);
ИначеЕсли (Знак=»Ё») Тогда
Итог=Итог+Символ(208)+Символ(129);
КонецЕсли;
КонецЕсли;
КонецЦикла;
Возврат Итог;
КонецФункции

    Показать

    Reply ↓
  2. bobank

    (1) ок, спасибо, взял на вооружение.

    Reply ↓
  3. bobank

    Во внешнюю обработку добавлена возможность использования кириллических символов.

    Reply ↓
  4. qwed557

    Не работает на больших строках, онлайн генераторы спокойно кодируют в QR, а этот может только привет мир закодировать.

    Пример:

    Наименование организации:»ффффф»

    Номер в реестре 1111111111

    Контаткный номер

    Сайт

    Официальный сайт

    Официальный сайт

    Страница организации

    Страница сайта

    еще одна страница

    Интернет приемная

    Личный кабинет

    Радел такойто…

    выдает код ошибки 1 неверно переданы параметры в скрипт

    Reply ↓
  5. bobank

    (4) в тексте, как представлено, есть переносы строк?

    Reply ↓
  6. bobank

    (4) попробуйте уменьшить процент восстановления

    Reply ↓

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *