Communicate to COM port (modem)

[dglienna]

This is how we did it, so I know a little about it:

Sub OpenDrawer()
  On Error GoTo ErrorOpenDrawer
  Open "//server/lpt" For Output As #1
    Print #1, Chr$(27) & Chr$(112) & Chr$(0) & Chr$(25) & Chr$(250)
  Close #1
  On Error GoTo 0
  Exit Sub
ErrorOpenDrawer:
  On Error GoTo 0
End Sub

and I know that it is VB. my point is that it also works in HyperTerminal