Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: feel_x am 28.04.03 - 11:19:50

Titel: und gleich noch eine Frage: Maske zum bearbeiten öffnen
Beitrag von: feel_x am 28.04.03 - 11:19:50

Gleich noch eine Frage hinterher:

Ich will, dass sich eine Maske für alle normalen User direkt im Bearbeitungsmodus öffnet, für die Manager der DB dagegen erstmal nur im Lesemodus.
gibts da eine ganz einfache Lösung?


:)
felix

Titel: Re:und gleich noch eine Frage: Maske zum bearbeiten öffnen
Beitrag von: Performance am 28.04.03 - 13:52:57

Sub Postopen(Source As Notesuidocument)
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim level As Integer
   Set db = session.CurrentDatabase
   If db.CurrentAccessLevel = 6 Then
      Source.EditMode = True
   Else
      Source.EditMode = False
   End If
End Sub


cu

Titel: Re:und gleich noch eine Frage: Maske zum bearbeiten öffnen
Beitrag von: feel_x am 28.04.03 - 13:57:58

Klasse, Danke!

Jetzt hab ich's auch in der Hilfe gefunden :)
War schwierig, weil ich nicht wusste, nach welchem Stichwort ich suchen musste..

thx
 ;D
felix