I created an Access database POS program (to be used with Access Run-Time) and attached a pole display (EMax). I downloaded the OPOS driver and it generates the test message on the pole display, so I know the pole display works. I put the following vba event code on the home page form:
Private Sub Form_Load()
MSComm1.CommPort = 1
' set port number
MSComm1.Settings = "9600,N,8,1"
MSComm1.InputLen = 0
'opens the port
On Error Resume Next
MSComm1.PortOpen = True
MSComm1.Output = "Welcome"
' set pole message
MSComm1.PortOpen = False
End Sub
I get Run-time error 424 Object required.
- I have no Com or Active-X Add-Ins: Do I need them for this to run properly & If so what/where????
- As you can tell I don't really understand MSComm and how I can get the serial Com 1 port to interact with the Access database.
- Once I get a general message to appear on the pole display I want to be able to have it display the item & price as entered on the OrderDetail Form and then the Total Due; Payment and Change Due from the Payment form.
- I have seen a PoleDisplay Module, while searching for answers but I don't really know what to do with it:
Option Compare Database
Global Const constPD_VerticalScrollMode As Integer = 18
Global Const constPD_NormalDisplayMode As Integer = 17
Global Const constPD_BrightnessControl As Integer = 4
Global Const constPD_BackSpace As Integer = 8
Global Const constPD_HorizontalTab As Integer = 9
Global Const constPD_LineFeed As Integer = 10
Global Const constPD_CarriageReturn As Integer = 13
Global Const constPD_DigitSelect As Integer = 16
Global Const constPD_CursorON As Integer = 19
Global Const constPD_CursorOFF As Integer = 20
Global Const constPD_Reset As Integer = 31
Global Const constPD_MessageScroll_Start As String = "&H05"
Global Const PD_MessageScroll_Stop As String = "&H0D"
Any guidance in the right direction would be greatly appreciated!