LOTUSSCRIPT /COM/OLE のクラス

例:ComputeWithForm メソッド
次のスクリプトは現在のデータベースに新規の文書を作成して、Form アイテムに「Notification」を設定します。また、Topic アイテムの値を設定します。[Notification] フォームは [Subject] フィールドに次の入力確認式を持ちます。

@If( Subject = ""; @Failure( "You must enter a Subject" ); @Success )

スクリプトは文書に Subject アイテムを作成しないため、入力確認式はエラーとなり、ComputeWithForm は False を返します。文書は保存されません。

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim success As Variant
Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
doc.Form = "Notification"
doc.Topic = "Large bodies of water"    
success = doc.ComputeWithForm( False, False )
If success Then
 Call doc.Save( True, True )
End If

関連項目