当ブログに掲載しているサンプルは、すべて利用者の自己責任という形でお願いします。
ただし、明らかな不具合がある場合、ご連絡いただければ、訂正記事を出します。
また、こちらのサンプルは、別のサイト等への公開、転載は一切禁止しています。
どうしてもと言う場合は、筆者にあらかじめご連絡ください。

テクてく Lotus 技術者 Slack に参加しよう!

2008年8月5日火曜日

バックグラウンドでの再計算

バックグラウンドで文書を作成すると、フォームに設定してあるInput Translation、Input Validationイベントなどが有効にならない。
それらを有効にさせたい場合は、下記のメソッドを利用する。

Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument

Set db = session.CurrentDatabase
Set doc = db.CreateDocument
・・・
flag = doc.ComputeWithForm( True, True )

if flag = True then
Call doc.Save( True, True )
end if
End Sub

Lotus Notes/Domino カスタマイズとセキュリティ強化 - 株式会社エフ

0 件のコメント: