我需要一些幫助,因爲我不知道從哪裏開始。理想情況下,我想要一個可以將我的Lotus Notes文檔轉換爲PDF文件的按鈕,然後它會打開一封新郵件,然後將該文檔中的電子郵件地址發送到「To」字段。此時我們使用CutePDF編寫器創建PDF文件。我打破的過程中像下面這樣:Lotus Notes文檔爲PDF
- 打印文檔
- 用戶選擇CutePDFwriter
- 保存PDF文件
- 撰寫與上放置Notes文檔的電子郵件地址的新電子郵件在'到'字段
任何人都可以幫我開始呢?
我需要一些幫助,因爲我不知道從哪裏開始。理想情況下,我想要一個可以將我的Lotus Notes文檔轉換爲PDF文件的按鈕,然後它會打開一封新郵件,然後將該文檔中的電子郵件地址發送到「To」字段。此時我們使用CutePDF編寫器創建PDF文件。我打破的過程中像下面這樣:Lotus Notes文檔爲PDF
任何人都可以幫我開始呢?
從Domino Designer幫助文件得到我的答案。使用下面的代碼打開郵件文件
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Dim doc As NotesDocument
Dim item As NotesItem
Set doc = uidoc.Document
Set item = doc.GetFirstItem("QSContactEMail")
Set uidoc = workspace.ComposeDocument _
(mailserver$, mailfile$, "Memo")
Call uidoc.FieldAppendText("EnterSendTo", "Test")
對於打印只需要調用打印功能,並讓用戶選擇CutePDF作家
如果您很樂意讓用戶選擇cutepdf作爲打印機,那麼您應該能夠在文檔或包含文檔的視圖的按鈕中使用@Commands(請查看筆記設計器幫助)。
我可以看到的唯一問題是用戶將能夠更改cutepdf打印到的路徑,因此您必須讓用戶再次找到附件(但是您將能夠自動化附件對話框向上)。
我想使用此代碼,但它不會打開我的郵件文件並顯示新的電子郵件窗口: 昏暗的工作區作爲新NotesUIWorkspace 昏暗uidoc作爲NotesUIDocument 設置uidoc = workspace.CurrentDocument 呼叫uidoc.Print 昏暗的分貝作爲新的NotesDatabase(「」,「」) 調用db.OpenMail \t Dim doc As NotesDocument Set doc = db.CreateDocument – 2012-03-09 13:16:02
如果你去www.openNTF.org網站和搜索「 PDF「,您可以找到幾個處理從Notes數據創建PDF文件的開源項目。 「PDF IT」項目處理從視圖創建PDF文件。 「SimplePDF」項目處理來自文檔的數據。 – 2012-02-29 19:53:32
如果找不到任何可行的其他方法,可以編寫一個使用Java PDF庫(例如iText)創建PDF文件的Java代理。 – awmross 2012-03-01 04:15:13