いいね!数

0

閲覧数
46

フォームのqueryOpenイベントに以下の式を設定しています。

 

Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
    
    Dim doc As NotesDocument
    
    Set doc = Source.Document
    
    cmd = Environ("comspec")
    wk = Shell(cmd & " /c Call """ & doc.docpath(0) & "\" & doc.docName(0) & """")
    wk = Shell(cmd & " /c Exit ")
    
    Continue=False
    
End Sub

 

ビュー上でこのフォームで作った文書をダブルクリックすると、docpathフィールドに設定されている

パス+docNameフィールドに設定されているファイル名を元にエクセル等の文書が表示されるように

なっています。

通常は、ビュー上で文書をダブルクリックするとエクセル等の文書が立ち上がるのですが、ユーザーの

中に、ビュー上で文書をシングルクリックしただけで、エクセル等の文書が開いてしまう人がいます。

これを解消して通常通りダブルクリックで文書が開くように戻したいのですが、方法がわかりません。

解決策のヒントでもあれば教えてください。

よろしくお願い致します。

サーバー情報: | クライアント情報: | 
カテゴリ:Notes - 使い方 | タグ:
  | 質問日時:Mar 22, 2019, 9:31:30 AM

回答・コメント

いいね!数

0

文書のプリビュー表示になってないでしょうか。

 

回答日時:Mar 22, 2019, 9:39:42 AM

いいね!数

0

dyateamさん、早々の回答をありがとうございました。

原因は結局わからなかったのですが、DBを一度クライアントから削除し、再度貼り付け直したところ

現象が解消しました。

お騒がせしました。

回答日時:Mar 22, 2019, 9:58:02 AM