ビュー上で文書の貼り付け(ペースト)を禁止する方法の紹介です。無断で文書をコピーされたり追加されるのを禁止する場合に活用してください。
ビューのQuerypasteイベントに以下のスクリプトを追加します。これでビューで「ペースト」イベントが発生した場合にキャンセルすることで結果的にペーストを禁止しています。
Sub Querypaste(Source As Notesuiview, Continue As Variant)
Continue=False
End Sub
以下の例ではユーザにメッセージを表示してから貼り付け処理を禁止しています。
Sub Querypaste(Source As Notesuiview, Continue As Variant)
Msgbox "文書の貼り付けはできません。",16,"エラー"
Continue=False
End Sub
本ページは IBM Lotus Notes Domino (ロータスノーツドミノ)を対象としています。 基本的には Notes 4,5,及び6以後を対象としていますが、バージョンによっては対応していない場合があります。 lotus scriptや @関数 (@コマンド)を対象としていて、VB Scriptには対応していません。 本サイト内掲載されている情報は、著作権法により保護されています。いかなる場合でも権利者の許可なくコピー、配布することはできません。 このページはリンクフリーです。(このページへの直接リンクも可能です。)[ホーム] - [ノーツドミノ プログラミングサンプル一覧]