LOTUSSCRIPT /COM/OLE のクラス

例:Remove メソッド
次のスクリプトは文書の Body アイテムに含まれる埋め込みオブジェクト「City picture」を削除します。

Dim doc As NotesDocument
Dim rtitem As Variant
Dim object As NotesEmbeddedObject
'...set value of doc...
Set rtitem = doc.GetFirstItem( "Body" )
If ( rtitem.Type = RICHTEXT ) Then
 Set object = rtitem.GetEmbeddedObject( "City picture" )
 Call object.Remove
 Call doc.Save( True, True )
End If

関連項目