Доброго времени суток. Ситуация следущая, нужно привязать sql базу, которая находится на сервере к 1с, чтобы та в свою очередь динамически забирала оттуда данные. Может знает кто уже готовые решения в виде внешних обработок, которые висят в свободном доступе. Буду благодарен

Vofka @ Вчера, 17:40 ,
Самое интересное, что ваш код не работал. Я понимаю что по сути это одно и то же, но первым вариантом кода программа реально не работала. Всё равно большое спасибо

Решение найдено, всем спасибо

ВремяСтарта = ТекущаяДата();
        Длит = 5;
        
            Пока ComPort.InBufferCount = 0 И (ТекущаяДата()- ВремяСтарта) < Длит Цикл
                     Массив = ComPort.Input; 
            КонецЦикла;

Vofka @ Сегодня, 10:54 ,
Ну не сбрасывать же мне весь код. То что я сбросил это лишь лакмусовая бумага, которая показывает то, что данный вариант не работает.
Извиняюсь, если что-то не так описываю
В 1с я человек новый

Vofka @ Сегодня, 10:15 ,
Я пробовал таким образом раньше делать
Не работает. Выбивает исключение, которое я прописал на всякий случай, чтобы видеть ошибки

                 Исключение
        Сообщить("Не возможно открыть порт.",СтатусСообщения.ОченьВажное);
        Отказ = Истина;
    КонецПопытки;    
    ComPort.PortOpen = Ложь;
    
КонецПроцедуры

и выдаёт именно "Не возможно открыть порт."

Petre @ Вчера, 10:50 ,
Vofka @ Вчера, 10:49 ,
Да тут не в названии дело)
Попробовал обработчиком и понял что это вариант не для данного случая.
Мне нужно не запускать всю процедуру по истечению времени. В коде есть отдельный цикл, который отвечает за приём данных.

 Пока ComPort.InBufferCount <= 1 Цикл
                 Массив = ComPort.Input;    
            КонецЦикла;

Так вот, мне нужно остановить именно его по истечению пяти секунд. У меня это даж было как-то получилось, но на ранней стадии разработки программы. Может кто подкинет идейку, как остановить именно этот цикл по завершению таймера. Я пробовал играться с текущей датой, но я какой-то глупый

Vofka @ Сегодня, 10:23 ,
Я по клику открываю порт, чтобы принять данные. И никак не могу написать код, который будет закрывать порт через например 5 секунд. Пробовал работать с функциями даты но всё безрезультатно. Мне нужно просто остановить цикл через 5 секунд после начала приёма данных, при условии, что данные не пришли

sava1 @ Вчера, 10:39 ,
А может есть еще какой-либо вариант реализации?

Ситуация следующая, открываю порт для получения данных, но не могу поставить закрытие по истечению времени(например секунд). Перепробовал всё что знал и вычитал. Может кто поделится мыслью

Процедура СчитатьКартуНажатие(Элемент)
    Перем ЗначениеСчитки;
    ComPort = Новый COMОбъект("MsCommLib.MsComm"); 
    Попытка
        ComPort.CommPort        = 3;
        ComPort.Settings        = "38400,N,8,1";
        ComPort.InputMode = 1;
        ComPort.PortOpen = Истина;    
        ЭлементыФормы.СостояниеСвязи.Заголовок = "Связь есть...";
        Таймаут = 5;
        ПорогТаймаута = ТекущаяДата() + Таймаут;
        ТекущееЧисло = ТекущаяДата();
        
            Пока ComPort.InBufferCount <= 1 и ТекущееЧисло <> ПорогТаймаута  Цикл
                 Массив = ComPort.Input;    
            КонецЦикла;
                        
             ДанныеСПорта = ComPort.Input;
                           
             Массив = ДанныеСПорта.Выгрузить();

Всем спасибо, решение получено, тему можно закрывать

Значится нашёл я документацию своей считки. Узрил необходимую скорость считывания данных и настройки, окей.

Потом решил все это затестить на ComRead. Получил следующие данные с карты

Окей, после чего решил вставить такие же настройки считки в свою обработку в 1с

И в итоге рпи запуске получаю следующие данные. Каждой паре соответствует свой элемент массива в 10-чной системе.

Но вся проблема остаётся в том, что ну не представляю совсем как эти данные перевести в те, которые указаны на карте, а именно; 0000188041 и 002,56969
Код программы чуть что указан выше

Итак, я уже писал в одной теме о подключении и получении данных с магнитного ридера. У меня это удалось, вот только данные я получаю непонятно какие. Вот код


Если учесть, если на карте имеется номер 0000255740(десятиричный) и 039,01335(некий ТЕКСТОВЫЙ код).
Помогите связать результат вывода с данными которые по идее должны выводиться(написаны на карте)

mut @ 19.10.18, 20:57 ,
И это конечно всё хорошо, но атоловский драйвер не совместим с 8.3.
Установил, програл считки, покапался в настройках. Почитал доку. Увы, ищу другой вариант

andr_andrey @ Сегодня, 11:32 ,
В том то и дело, что я не понимаю, что вообще передаёт ридер.
Вот например я приложил 5 карт. И какие значения он выдал

andr_andrey @ Вчера, 15:45 ,
Это конечно всё хорошо, но всё равно не могу прикрутить COMSafeArray. Перечитал всю документацию и всё равно не понимаю, как он работает

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

Ситуация такая. Куплен новый ридер магнитных карт CR-EM-USB. Подключил к компьютеру, установил ПО.
Пишу обработку в 1с для получения данных с порта. Но в итоге данные приходят не 10-чной системе, а фиг пойми вообще что это такое.
Бросаю якорь, может кто подскажет, как корректно получить данные. Скрины прилагаю.

awp @ Сегодня, 9:37 ,
увы, я только закончил университет

Vladal @ Сегодня, 9:18 ,

А поделиться из солидарности Вы конечно же не сможеТЕ?)))

andr_andrey @ Сегодня, 8:39 ,
вся проблема еще заключается в том, что производитель белорусский и у него полностью отсутствует ПО. Я как бы пробросил его и в диспетчере устройств он отображается как СОМ порт. Но лично меня сйчас больше интересует программный код для работы считки с 1с.

Задача следующая. Необходимо подключить магнитную считку к базе 1с. Не представляю вообще как это делать. Пока я только подключил ридер через сом порт и всё. Может кто работал с такой задачей и у него остался код, то не могли бы скинуть во внешнюю обработку или хоть как-либо направить меня на путь истинный. Заранее спасибо.