LotusScriptを使用してフォームをプレビューする方法

Question

現在のフォームをプレビューし、プレビューで印刷することができます。これはどのように蓮のスクリプトで行うことができますか？

Answer 1

現在選択されているドキュメントをビューでプレビューしますか？

Sub Click(Source As Button) 
    Dim w As New NotesUIWorkspace 
    Dim doc As NotesDocument 
    Set doc = GetSelectedDoc() 

    Call w.DialogBox(doc.form(0),True,True,True,True,False,True,"Put your title here",doc,True,True,False) 
End Sub 

Function GetSelectedDoc() As NotesDocument 
    'Mb¤, 04.04.2005 
    'The function returns currently selected document 
    'On Error Goto ErrHandler 
    Dim s As New NotesSession 
    Dim db As NotesDatabase 
    Dim c As NotesDocumentCollection 

    Set db = s.CurrentDatabase 
    Set c = db.UnprocessedDocuments 
    If c Is Nothing Then Exit Function 

    Set GetSelectedDoc = c.getFirstdocument 

    'add your error handling 
End Function 

がNotesUIWorkspace.DialogBoxののparam説明についてhereを参照してください：
あなたはこのような何かを実行しますビューのアクションを使用することができます。

それとも、単に@DialogBox式を使用することができます

@DialogBox(form ; [AUTOHORZFIT] : [AUTOVERTFIT] : [NOCANCEL] : [NONEWFIELDS] : [NOFIELDUPDATE] : [READONLY] : [SIZETOTABLE] : [NOOKCANCEL] : [OKCANCELATBOTTOM] : [NONOTE] ; title) 

Answer 2

ノートを印刷のための本当に素晴らしいではありません。要件に応じて、コードを書いてワード文書を作成し、印刷する方がよいでしょう。これを達成するための多くの例があります。ここにあなたを始めようとする人の一人がいます：http://searchdomino.techtarget.com/tip/A-flexible-data-export-agent-for-Lotus-Notes

Answer 3

印刷するフォームの読み取り専用バージョンでサブフォームを作成します。

フォームをプレビューするには - サブフォームをダイアログボックスに表示させます。メイン文書の値を継承するようにダイアログボックスを設定しました。

サブフォームには、読み取り専用ドキュメントを印刷する印刷ボタンが表示されます。プリントボタンを非表示にします。

Answer 4

文書を右クリックしようとしましたか？右クリックして印刷することができます。私はまずシンプルなことを試し、これがユーザーのニーズを満たしているかどうかを確認します。

ドキュメントを処理しているプロセスが完了していて、最終的なドキュメントをプレビューするワークフローについて言及している場合は、Java側またはNotesUIクラスのUIドキュメントクラスを使用してこれを行う必要がありますLotusScriptで。 UIDocumentのハンドルを取得すると、いくつかのことができます。

ドキュメントを読み取り専用に設定し、そのオブジェクトがUIデザイン内にある場合はプレビューウィンドウに表示します。ドキュメントを印刷するかどうかをユーザーに問い合わせて、UIDocument.printオプションを使用できます。