Domino 9 und frühere Versionen > ND6: Entwicklung

Wechsel EditMode im Postopen

<< < (3/3)

cash:
Das es nicht smart ist habe ich mir schon gedacht. Nur leider habe ich bisher keinen Schimmer von LotusScript.

Das beste ist aber die User haben auch keinen schimmer ;D und deshalb kommen die auch nicht auf STRG+B

und 1700 wird dort auch nie erreicht, denn sooft werden die Vordrucke nicht aufgerufen.
Das Unternehmen ist nicht so groß...

Habe auch gerade erst angefangen in Notes Datenbanken zu erstellen. Werde in diesen Jahr noch 6 Tage Fortbildung dort haben, aber bis dahin bin ich halt am probieren. Ob gut oder nicht ist mir erstmal egal hauptsache es läuft...

Mit dem If Konstrukt habe ich versucht zu sagen wenn User hat Rolle Leser dann
gehe in EditMode und fühle die beiden Statistik Felder, wenn nicht mach garnichts.

Gruß

Cash

Otto:
Gemeint haben dürftest Du :

@If(@IsMember("[Leser]";@UserRoles);
@Do(
@PostedCommand( [EditDocument]; "1" );
FIELD Statistik:=@If(Statistik="";@Text(@Now);Statistik:@Text(@Now));
FIELD Statistik_1:=@If(Statistik_1="";1;Statistik_1+1);
@PostedCommand( [EditDocument]; "1" );
@PostedCommand([FileSave];"1")
);
@Return(""))


Ein 'Strg-B' zu verhindern ist auch kein Hexenwerk (auch wenns nur mit Script klappt)
So z.B. lässt Du alle Ottos draußen:

Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
   Dim s As New notessession
   continue = source.Editmode And (Instr("OTTO", Ucase(s.username)) > 0)
End Sub

Gruß
Otto

cash:
mit dem Do funktioniert leider auch nicht. Zwar macht er keine Fehlermeldung aber zählen tut er auch nicht.

Wenn ich mit Rolle Editor reingehe bin ich nicht im EditMode (so soll es sein). Bei der Rolle Leser sieht es zwar gut aus aber die Statistikfelder erhöhen sich nicht.

Cash

Otto:
Sorry, das war wohl etwas missverständlich.
Ich wollte mit dem eingefügten @do eigentlich nur auf die @if-Syntax hinweisen; die ist nämlich so ausgelegt, dass Deine Formel schon mal daher an die Wand fährt.

Weiterhin: wenn Du Deine Formel so im Postopen stehen hast, im
Querymodechange aber den Übergang zum Editmode  blockst ...

Wenn Du unbedingt auf @Formel bestehst, bau mal diese im Queryopen ein:

@If(@IsMember("[Leser]";@UserRoles);
@Do(
FIELD Statistik:=@If(Statistik="";@Text(@Now);Statistik:@Text(@Now));
FIELD Statistik_1:=@If(Statistik_1="";1;Statistik_1+1);
@Prompt(1;@Text(Statistik_1); "EDITMODE!")
);
@Return(""))

Gruß
Otto

Navigation

[0] Themen-Index

[*] Vorherige Sete