Други, творческих успехов вам!!!
Подскажите прогу/модуль для обмена данными между Access и ККМ Меркурий MS-K.
Как прикрутить ККМ к Access
Модератор: Naeel Maqsudov
-
- Сообщения: 526
- Зарегистрирован: 04 фев 2007, 18:37
- Откуда: Сургут
- Контактная информация:
Здравствуйте Sergey_V.
возможно это невежество, но я не знаю, что такое "ККМ Меркурий MS-K", и в каких он отношениях с MS Office и VB(A).
Евгений.
возможно это невежество, но я не знаю, что такое "ККМ Меркурий MS-K", и в каких он отношениях с MS Office и VB(A).
Евгений.
это контрольно-кассовая машина. в её составе есть фискальный регистратор который можно прикрутить практически к любой проге. Вот хочется такое пркирутить к Access.
доп инфа на http://www.incotex.ru/incotex/downloadarea.html#msk
моя проблема: передать цифру в ФР и получить чек. Заморочки типа возвратов,отчетов по ККМ и тп не нужны.
доп инфа на http://www.incotex.ru/incotex/downloadarea.html#msk
моя проблема: передать цифру в ФР и получить чек. Заморочки типа возвратов,отчетов по ККМ и тп не нужны.
модуль выложен по вашей ссылке
его драйвером обозвали))
его драйвером обозвали))
ака хинт: коментируйте код, самим же легче будет разобраться 

- Naeel Maqsudov
- Сообщения: 2570
- Зарегистрирован: 20 фев 2004, 19:17
- Откуда: Moscow, Russia
- Контактная информация:
ActiveX сомпонент MercuryFPrtX просто добавляется на форму. Он же сам отображает статус соединения с ККМ. Ну и у него есть методы всякие... Кстати и икс-отчет - это всего лишь одна строка кода.
Для чека должно быть что-то вроде
Для чека должно быть что-то вроде
Код: Выделить всё
Sub qwe()
With MercuryFPrtX1
.Open
.OpenReceipt motBuying
.AddPay mptCash, сумма, 0, "наименование"
.CloseReceipt
.FeedAndCut 2, True
.Close False
End With
End Sub