開いている文書が読み込みモードか編集モードか判定するサンプルコードの紹介です。以下のように editmode プロパティで判定します。
Dim ws As New notesuiworkspace
Set uidoc = ws.currentdocument
If uidoc.editmode=True Then
Msgbox "編集モードです"
Else
Msgbox "読込みモードです"
End If
参考：
常にフォームを編集モードで開くにはフォームのプロパティである「常に編集モード化」をオンに設定します。
本ページは IBM Lotus Notes Domino (ロータスノーツドミノ)を対象としています。 基本的には Notes 4,5,及び6以後を対象としていますが、バージョンによっては対応していない場合があります。 lotus scriptや @関数 (@コマンド)を対象としていて、VB Scriptには対応していません。 本サイト内掲載されている情報は、著作権法により保護されています。いかなる場合でも権利者の許可なくコピー、配布することはできません。 このページはリンクフリーです。(このページへの直接リンクも可能です。)[ホーム] - [ノーツドミノ プログラミングサンプル一覧]