Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

send text to printer

141 views
Skip to first unread message

Mike

unread,
May 28, 2005, 11:54:46 PM5/28/05
to
How do you simply send text to a printer?.
Thanks.


Monkey

unread,
May 29, 2005, 11:21:59 PM5/29/05
to
create a file with the text in it, then invoke the verb print to print
it to your default printer.

strFile = "test.txt"
strFolder = "C:\temp"
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(strFolder)
objFolder.ParseName(strFile).InvokeVerb("print")

Modified from http://www.codecomments.com/message212154.html

I'm not sure, but you may be able to change your standard output to
your printer for a short while, then send your output there. Just
thinking out loud.

Monkey

0 new messages