[AccessD] Using Access as a cash register

Gustav Brock gustav at cactus.dk
Wed Feb 25 09:58:26 CST 2004


Hi John

Traditionally this is done by sending some (arbitrary) chars to the
serial port, but the manual or the dealer must confirm this.
If so, it's very simple:

<code>

  Dim strPort as String
  Dim strOpenDrawer as String

  strPort = "1"     ' Adjust for 1, 2 or 3 as needed.
  strPort = "LPT" & strPort
  strOpenDrawer = Chr(130)

  ' Send special character string to the cash drawer via PC port.
  Open strPort For Output As #1
  Print #1, strOpenDrawer
  Close #1

</code>

If this is the setup, remember that WinNT+ for some reason doesn't
feed that much power to the serial port which means that you'll need
to have an external power supply to the cash drawer.

I haven't worked with the USB interface.

/gustav


> Setting up an A2k form as the input for point-of-sale transaction is not too
> difficult. My problem is how to trigger a serial or UBS port to open a till 
> draw by hitting a cmd button.

> Anyone hit this problem before or any suggestions?

> johnwb 




More information about the AccessD mailing list