2011-01-11 78 views

回答

0

要在視圖中預覽當前選定的文檔?
你可以使用,將運行這樣的觀點行動:

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) 
0

用想要打印的表單的只讀版本創建子窗體。

預覽窗體 - 讓子窗體顯示在對話框中。將對話框設置爲從主文檔繼承值。

在子窗體上顯示將打印只讀文檔的打印按鈕。打印時隱藏打印按鈕。

0

您是否嘗試過在文檔上點擊右鍵?您可以通過點擊右鍵來打印它。我會先嚐試簡單的事情,看看是否符合用戶需求。

如果您正在討論處理文檔的工作流程,並且該流程已完成並且您想要預覽最終文檔,則應該可以通過Java側或NotesUI類中的UI文檔類來完成此操作在LotusScript中。一旦你有一個處理UIDocument,你可以做幾件事情..

我會嘗試設置文件只讀,並在預覽窗格中顯示它,如果該對象是在您的UI設計中。然後,您可以查詢用戶是否要打印文檔並使用UIDocument.print選項。