TCP/IP Printer

[AtomicSlaughter]

So i wrote a program that will print a file to printer in raw text.

I needed this as the LPRINT command is unavailable on LINUX.

I hope this file is helpful to you all.

Code: QB64: [Select]

1. DIM PrinterConnect AS LONG
2. DIM CRLF AS STRING
3. DIM CRFF AS STRING
4. DIM LinePrint AS STRING
5. CRLF$ = CHR$(13) + CHR$(10) ' end current print line and starts new line
6. FF$ = CHR$(12) ' end current print line and finish printing
7. ESC$ = CHR$(27)
8. CLS
9. PrinterConnect = _OPENCLIENT("TCP/IP:9100:***.***.***.***") 'replace astrix with your printers IP address. opens a connection to your printer
10. IF PrinterConnect THEN
11.     PRINT "[Connected to " + _CONNECTIONADDRESS(PrinterConnect) + "]"
12. ELSE PRINT "[Connection Failed!]"
13. END IF
14.  
15. printstring1$ = "this is a printed line" + CRLF$
16.  
17. PRINT
18. INPUT "please enter the name of the file you want to print>", FileName$
19. OPEN FileName$ FOR INPUT AS #1
20. DO
21.     LINE INPUT #1, LinePrint$
22.     PrintString$ = LinePrint$ + CRLF$
23.     PUT #PrinterConnect, , PrintString$:
24. LOOP UNTIL EOF(1)
25. PUT #PrinterConnect, , FF$

[FellippeHeitor]

That's very useful! Thanks for sharing, this definitely needs to have a mention in the Wiki for non-Windows users.

Also, thanks @SpriggsySpriggs for pointing it out in the chat at Discord.

[Pete]

I'll have to assume Fell checked it out on his Linux system, so it works, as advertised. This would be a great addition to the Wiki. I was thinking of how to work something similar to this into my WP, for non-Windows users. Adding this might be the ticket.

Pete

[FellippeHeitor]

I didn't test it myself, but I followed Atomic as he tested and tweaked this until it worked in this final form he published.

[SpriggsySpriggs]

That's very useful! Thanks for sharing, this definitely needs to have a mention in the Wiki for non-Windows users.

Also, thanks @SpriggsySpriggs for pointing it out in the chat at Discord.

No problem. Glad Atomic got to make use of something I used at work.

[AtomicSlaughter]

Thank you for your help with this SpriggsySpriggs