-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


Подключение фискального регистратора

Вторник, 26 Сентября 2017 г. 20:35 + в цитатник
Здравствуйте. Пытаюсь разобраться в подключении фискальных регистраторов к программе написанной на Access. Под рукой имеется регистратор IKC-483LT. При попытке создания объекта для обращения к нему возникает следующая ошибка. Возможно кто-то сталкивался с подобным и может подсказать что делать, потому как я в тупике. Вот мой код и скрин ошибки.

Private Sub Start_Click()
'Создаем объект общего драйвера ККМ
Dim ECR As Object
Set ECR = CreateObject("IKC483LT")
'Занимаем порт
ECR.DeviceEnabled = True
Select Case ECR.ResultCode
Case -3
Call MsgBox("Порт занят другим приложением или данный порт отсутсвует в ПК либо ККМ не включено.", vbCritical + vbOKOnly)
Case 0
End Select

'Проверяем связь с ККМ.
Select Case ECR.GetCurrentMode
Case -1 'Нет связи с ККМ.
Call MsgBox("Нет связи с ККМ либо ККМ не включено!", vbCritical + vbOKOnly)
End Select

End Sub

http://www.sql.ru/forum/1272618/podkluchenie-fiskalnogo-registratora


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку