0

編集した Word 文書をロータス ノーツ経由で多数の人に郵送するメール システムを自動化しようとしています。

そのために、次のコードを使用しています。このコードは、メールとして送信されている間にすべての書式設定 (太字、斜体、段落など) が失われることを除けば、問題なく動作します。

Set objRange = ob_doc.Content
mailtext = ob_word.CleanString(objRange.Text)

'Create the mail document
Set notesDocument = notesDatabase.CreateDocument
'set to memo format
notesDocument.Form = "Memo"
'Set the subject
notesDocument.Subject = subject
'Set the body
Set notesRichTextItem = notesDocument.CreateRichTextItem("Body")
notesRichTextItem.AppendText(mailtext)

… いろいろ調べた結果、フォーマットを損なわないように doc という単語を html に変換しようとしましたが、その html ファイルをメール本文として送信できませんでした。

4

3 に答える 3

1

電子メールを HTML として送信するには、Notes で MimeEntity クラスを使用する必要があります。詳細については、この SO Answer を参照してください: Excel VBA から書式設定された Lotus Notes リッチ テキスト メールを送信する

于 2012-06-07T18:58:59.590 に答える
0

または、Word 文書を添付ファイルとして送信することもできます。それほどエレガントではありませんが、コーディングは簡単です。

于 2012-06-07T20:20:52.780 に答える
0

MS Word で表示されるのと同じように、Word 文書をノーツ クライアント (またはその他の電子メール クライアント) で表示したい場合、頭痛の種です。最も近い解決策は、MS Word を使用してドキュメントを HTML として保存し (前述のように)、Notes MIME クラスを使用して、Word によって生成された HTML を使用して電子メールを作成することです (Ken が述べたように)。直面する最大の問題は、Word がスタイルを使用する方法にあります。メール クライアントごとにスタイルの要件が異なり、Notes はかなりうるさいです。たとえば、すべてのスタイルは (グローバルまたは外部ではなく) インラインである必要がありますが、Word はこれを行いません。

于 2012-06-12T13:06:27.803 に答える