Domino 9 und frühere Versionen > Entwicklung

Fenster bei Doc in Bearbeitungsmodus setzen

<< < (2/2)

Rob Green:
hm..sorry, machen wir es ausführlicher:

1. Möglichkeit:
diese Formel in die Maske des Docs, in ein Berechnet zur Anzeige Feld:
@if(@UserAccess( @DbName )="2";"!!! Achtung, Sie können das Dokument nicht bearbeiten !!!";void)

Damit sieht ein Leser immer obigen Hinweis, sobald er ein Dokument aufmacht (je nachdem natürlich, wo das Feld steht).

2. Möglichkeit:
User klicken immer gerne auf Buttons, statt kurze Wege zu gehen. Also nutze das und blende Ihnen, wenn obige Formel in einem Aktionsbutton im geöffneten Doc steht und der DAU drauf klickt, eine Messagebox ein:
@if(@UserAccess( @DbName )="2";@prompt([ok];"ACHTUNG";"Sie können das Dokument nicht bearbeiten !!!");void)

3. Möglichkeit: QueryModeChange
Hinweis: wenn ein User im geöffneten Doc doppelt auf das Doc klickt, wird u.a. der Event QueryModeChange ausgelöst. Ich behaupte mal, das QueryModeChange bei einem Leser überhaupt nicht ausgelöst wird. Täusche mich gerne. Probier daher mal folgendes aus der Notes Help aus:
 1.      This script prevents the user from switching to Edit mode and displays a message informing the user that the document cannot be edited.
Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
 If Not ( source.EditMode ) Then
   Messagebox("Sorry, the text you wrote can't be edited.")
   continue = False
 End If
End Sub
 2.      This script checks if the user is switching from Read mode to Edit mode. If so, and if the Status field contains "Closed," the script displays a message and prevents the user from switching to Edit mode.

Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
 If Not ( source.EditMode ) Then
   currentStatus = source.FieldGetText( "Status" )
   If ( currentStatus = "Closed" ) Then
     Messagebox _
     ( "Document available for browsing only." )
     continue = False
   End If
 End If
End Sub

eknori (retired):
Sehr schöne und ausführliche Ausführung: 3 Respekt Punkte

eknori

Wipe:
@rar und @Rob_Green

vielen dank für Eure Hilfe. Werde es die Tage entsprechend mal testen.

Gruss
Bubble

Navigation

[0] Themen-Index

[*] Vorherige Sete