2012-02-29 21 views
1

私はどこから始めるべきか分からないので、助けが必要です。理想的には、私はLotus Notes文書をPDFファイルに変換できるボタンを持っています。その後、新しい電子メールを開き、その文書の電子メールアドレスを「To」フィールドに入力します。この時点で、CutePDFライターを使用してPDFファイルを作成します。Lotus Notes文書をPDFに

  1. 印刷文書
  2. ユーザーがCutePDFwriter
  3. 保存
  4. が置かノートドキュメント上にあるメールアドレスを使用して新しいメールを作成pdfファイルを選択します。私は、以下のいずれかのようプロセスを打破します「To」フィールド

誰もがこれを手伝ってくれますか?

+2

を選択してみましょうPDF」では、NotesデータからPDFファイルを作成するためのいくつかのオープンソースプロジェクトがあります。 「PDF IT」プロジェクトは、ビューからPDFファイルを作成することを扱っています。プロジェクト "SimplePDF"は文書からのデータを扱います。 –

+0

他のアプローチが見つからない場合は、Java PDFライブラリの1つ(iTextなど)を使用してPDFファイルを作成するJavaエージェントを作成できます。 – awmross

答えて

0

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

を開くために、以下のコードを使用して、「www.openNTF.orgのWebサイトを移動して検索する場合、ユーザはCutePDFライター

0

ユーザーがcutepdfをプリンタとして選択できるようにしたい場合は、ドキュメントまたはドキュメントを含むビューのボタンで@コマンドを使用することができます。 )。

私が見ることができる唯一の問題は、cutepdfが印刷するパスをユーザーが変更できるため、ユーザーが添付ファイルを再度見つけ出さなければならないことです(しかし、添付ファイルダイアログを自動化することができますアップ)。

+0

私はこのコードを使用しようとしていますが、それは私のメールファイルを開くことができませんし、新しいメールウィンドウ表示:位置NotesUIDocument セットuidocなどの新しいNotesUIWorkspace 薄暗いuidocとして 薄暗いワークスペースを= workspace.CurrentDocument コールuidoc.Print 薄暗いデシベル新しいNotesDatabase( ""、 "")として を呼び出します。db.OpenMail \t Dim doc As NotesDocument Set doc = db.CreateDocument –

関連する問題