USB Device & Printer Pooling

I have several cash registers with cash drawers that open by writing a file to the lpt1: device.  The newest cash register/cash drawer has a USB interface.  I got it to work with lpt1: device by changing the printer properties.  Specifically, Star TSP743II -> Properties -> Ports tab -> check off both lpt1: and usb001ports and check of Enable printer pooling.  When I restart the computer these settings are no longer set.  How can I get them to stick? Printer Properties
Dim intFF as integer

intFF = FreeFile
Open "lpt1:" For Output As intFF
Print #intFF, Chr(7)
Close #intFF

Open in new window

Who is Participating?
truromeo4julietConnect With a Mentor Commented:
how about re-writing the code to print to "cash:" port, and renaming the used port on each PC to "cash:" ?
MariaHaltAuthor Commented:

I like your idea and I think it would work, but  I'm under the gun and this is the solution I'm actually going to implement for now::

If strPOS = "NewCashRegister" Then
   Open "\\<mycomputername>\<mysharedprintername>" For Output As intFF
   Open "lpt1:" For Output As intFF
End If
that's a simplisticly beautiful code. I like it.
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.