LOTUSSCRIPT /COM/OLE のクラス
例:GetAttachment メソッド
1. 次のスクリプトは、文書の添付ファイル JIM.SAM を取得します。
Dim doc As NotesDocument
Dim object As NotesEmbeddedObject
'...set value of doc...
Set object = doc.GetAttachment( "jim.sam" )
2. 次のスクリプトは、文書の Body アイテムに添付ファイル JILL.SAM があるかどうかを調べます。アイテムに添付ファイルがないとき、スクリプトは GetAttachment を使用して文書全体を対象に添付ファイルを検索します。
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
' check for attachment in Body item
Set object = rtitem.GetEmbeddedObject( "jill.sam" )
If ( object Is Nothing ) Then
' check for attachment in rest of document
Set object = doc.GetAttachment( "jill.sam" )
End If
End If
関連項目
GetAttachment メソッド
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
ヘルプの使い方
すべてのヘルプ項目
用語集