Hello All,
    having looked at the object model, I am thinking there is no way to do
this without creating an app with VB that does it, and referencing it in my
script. If anyone knows of a way to do it without writing a separate VB app
I would greatly appreciate it.

Regards,
Gordon Price

Use the FileSystemObject and open the device LPT1 or PRN.

--
Tim Hill -- Windows NT MVP

(Pursuant to US Code, Title 47, Chapter 5, Subchapter II, 227, any and all
nonsolicited commercial E-mail sent to this address is subject to a download
and archival fee in the amount of $1000 US.  E-mailing denotes acceptance of
these terms.)

Tim,
    I must be looking in the wrong place for a reference. I have tried both
the WSH and VBScript online doco at msdn.microsoft.com\scripting, to no
avail. Under FileSystemObject I only find two open methods, 'Open Text File'
and 'Open as Text Stream', neither of which seems to be the one I need. If
you would point me in the right direction, I would greatly appreciate it.

Regards,
Gordon Price

The OpenTextFile method should do the job, something like ...

Subroutine Print(Text)
  Const ForReading = 1, ForWriting = 2
  Dim objFS, objF
  Set objFS = CreateObject("Scripting.FileSystemObject")
  Set objF = objFS.OpenTextFile("LPT1", ForWriting)
  objF.WriteLine Text ' or objF.Write Text (without newline)
End Subroutine

I have noticed that the OpenTextFile will lock-up if used to open the
CON (console) device under the Wscript.exe host, but works fine under
'cscript.exe' instead.  I haven't specifically tested the LPT ports to
see if they have a similar problem in Wscript.

Tom Lavedas
-----------
http://www.pressroom.com/~tglbatch/