HP-3000 Systems Discussion wrote:
> Thanks Larry.  I'm really looking for a way we can do a
> screen print of the current screen to the default printer for
> the desktop.  I have an rcl working but I had to copy the
> screen to a file and it ends up losing the line-draw
> characters.  I can't seem to get it to print by using only a variable.

Hello Bob,

What I did was turn on the Macro Recorder, did a File | Print | and selected
screen.  I stopped/saved the macro and this is what was generated:

Sub mcrPrintScreen()
' Generated by the Reflection Macro Recorder on 06-26-2003 11:59:35.05.
' Generated by Reflection for HP 7.00.
    On Error GoTo ErrorHandler

    With Session
        .DefaultPrinter = ""
        .DefaultPrinter = "LaserJet 2100,winspool,IP_xxx.xxx.xxx.xxx"
        .Print rcScreen
    Exit Sub

ErrorHandler:
    .MsgBox Err.Description, vbExclamation + vbOKOnly

    End With
    ' Recording stopped at 12:00:10.44.
End Sub

HTH,

Mark W.

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *