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?
Dim intFF as integer
intFF = FreeFile
Open "lpt1:" For Output As intFF
Print #intFF, Chr(7)