LOTUSSCRIPT /COM/OLE のクラス

例:SelectAll メソッド
次のフォームアクションスクリプトは [FirstDraft] フィールドの内容をコピーして [Revision] フィールドに貼り付けます。

Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Call uidoc.GotoField( "FirstDraft" )
Call uidoc.SelectAll
Call uidoc.Copy
Call uidoc.GotoField( "Revision" )
Call uidoc.Paste
End Sub

関連項目