Hey Leute
habe in den weiten des Forum dieses Skript gefunden. und das wäre genau das was ich suche.
Leider bin ich ein ziemlicher newbie auf dem gebiet. versteh zwar den code und was ich da machen muss.
leider weiß ich aber nicht welche zeilen ich für mich anpassen muss damit das funktioniert.
Vorallem wie funktioniert das mit der Liste und wie wende ich diese geschichte in meiner aktuellen gestalltung an. Was hab ich bis jetzt gemacht:
dieses Feld in der memo maske angelegt. den Code in der Eingabevalidierung eingefügt. die ganzen sachen mit der liste(da ich das nicht verstanden hab zum testen) gelöscht. und unter gestalltung "Vorschau in Notes" getestet. bin voll zufrieden schon mal damit. Aber ich bekomm das einfach nicht hin das es unter meiner aktuellen Gestalltung funktioniert und das mit der Liste check ich net.
Würde mich freuen wenn mir jemand helfen könnte.
Gruss
P.S. wir haben 6.0 Server und Clients
So jetzt das Skript
So gehts:
=======
Bearbeitbares dauerhaftes verstecktes Feld ganz unten in der Memomaske names "MaiCheckSize" hinzufügen und folgendes in der Eingabevalidierung eintragen:
REM "========================================" ;
REM "Fehlermeldung anzeigen, wenn Dokument grösser als die erlaubten KB sind" ;
REM "========================================" ;
lz := @NewLine + @NewLine ;
nz := @NewLine ;
MaxKB := 3000 ;
UserCN := @Name([CN] ; @UserName) ;
UserAB := @Name([Abbreviate] ; @UserName) ;
WerDarf := "Name1/Org/Domain" ;
DocSize := @Sum( @If ( @Attachments > 0 ; @DocLength / 1024 ; 0)) ;
Text := "Das Memo kann nicht versendet werden, da es grösser als " + @Text(MaxKB;"F,0") + " KB ist. Aktuelle Memogrösse: " + @Text(DocSize;"F,0") + " KB." ;
@If ( DocSize > MaxKB & @IsDocBeingMailed & @IsNotMember(UserAB;WerDarf) ;
@Failure(Text) ;
@Success ) ;
http://www.atnotes.de/index.php?board=9;action=display;threadid=3031;start=0bzw.
http://www.atnotes.de/index.php?board=6;action=display;threadid=4977