- This form action script displays the File Print dialog box, where
the user can either select settings for printing the current document,
or select Cancel.
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Call uidoc.Print
End Sub
- This form action script prints one copy of the current document
without displaying the File Print dialog box.
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Call uidoc.Print( 1 )
End Sub
- This script prints one copy of pages 2 and 3 of the current document.
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Call uidoc.Print( 1, 2, 3 )
End Sub
- This script prints one copy of the current document on the printer
Printer247.
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Call uidoc.Print( 1, 0, 0, False, "Printer247" )
End Sub