LOTUSSCRIPT /COM/OLE のクラス

例:WindowTitle プロパティ
次のフォームアクションスクリプトは、ダイアログボックスを表示して、ユーザーに文書の削除の確認を求めます。アクションが表示されるのは文書が読み込みモードのときだけです。編集モードでは文書は削除できません。

Sub Click(Source As Button)
 Dim workspace As New NotesUIWorkspace
 Dim uidoc As NotesUIDocument
 Dim choice As String
 Set uidoc = workspace.CurrentDocument
 choice = Inputbox( "Do you want to delete " +  _
 uidoc.WindowTitle + "?","" )
 If ( choice = "yes" ) Or ( choice = "y" ) Then
   Call uidoc.DeleteDocument
 End If
End Sub

関連項目