LOTUSSCRIPT /COM/OLE のクラス

例:OpenFileDialog メソッド
次のエージェントは、ユーザーが [開く] ダイアログボックスで指定したファイルを削除します。

Sub Initialize
Dim ws As New NotesUIWorkspace
REM Get filename from user
filenames = ws.OpenFileDialog( _
True, "Select files to be deleted",, "c:\work")
If Not(Isempty(filenames)) Then
Forall filename In filenames
Kill filename
End Forall
End If
End Sub

関連項目