Printing (to a printer) the value of a variable directly from code

[cmztrav]

Hi all,

I had some simple subs that calculated a Unicode string and sent it directly to a printer (happens to be a thermal printer used for UPS labels) using the Open # syntax (specifically, to create a handle to the printer) on an older version of Access. I have a new computer running Windows 10 and Access 2016 and the old code is now printing the data to a file instead.

I have searched and searched, and I have not been able to see anything about performing as simple a task as printing directly to a printer from code. I suspect the paradigm has changed. I hope some kind person might point me in the direction.



ps: A solution that works for the older versions as well as the newer version of Access would be ideal.

[ranman256]

you would open the port the printer is on,

Open "\\Kb\ZM400" For Output As #1       'Kb = computer Name; ZM400 = Shared printer name
For rows = 1 To 37 ' send the first 37 rows of ASCII codes from the worksheet "STRINGS"
    Print #1, Worksheets("STRINGS").Cells(rows, 1).Value
Next
Close #1

[cmztrav]

you would open the port the printer is on,

Open "\\Kb\ZM400" For Output As #1       'Kb = computer Name; ZM400 = Shared printer name
For rows = 1 To 37 ' send the first 37 rows of ASCII codes from the worksheet "STRINGS"
    Print #1, Worksheets("STRINGS").Cells(rows, 1).Value
Next
Close #1

Thank you for taking a look, but in my post I specified that this syntax was only writing to a file in Access 2016.