Examples: Verbs property
This script displays each verb associated with the "City picture" embedded object in the Body item of a document. For example, the script displays "Edit" and "Open."
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" )
Forall v In object.Verbs
Messagebox( v )
End Forall
End If