MailDB-Größe - User-Info

[Redredson]

Hallo,

wir haben die MailDB des Standard-Users auf 50 MB begrenzt. Die Beachtung der Größenbeschränkung von Datenbanken bei Mail-Zustellung ist severseitig aktiviert.

Weiss jemand ein Tool oder ein Script, dass den User regelmäßig über seine MailDB-Größe informiert? Am besten am WE-Anfang und am WE-Ende. Somit soll er gezwungen werden seine MailDB regelm. aufzuräumen, d.h. die großen PPS-Files mal zu löschen :-)

Wie regelt ihr das??? Tips?

THX
Redredson

[max.power]

also wir verwenden dazu einfach den warnschwellwert.
z.b. mail-db-limit 500mb, warnschwellwert 450mb...
bei jedem einstieg in notes wird der user gewarnt bzw. erinnert.

hilft das?
max

[Redredson]

Hi,

na das mit dem Warnschwellenwert ist ja logisch, hilft aber nicht! Der User "an sich" ist erst mal zu doof und brauch mehr Info's, am besten per Mail, wo genau drinn steht was er tun kann.

Redredson

[Glombi]

Ich habe das mal für einen Kunden umgesetzt: Im Datenbank-Script unter Postopen die Größe mit
db.Size
(in Byte) abfragen und dann bei Überschreitung eines bestimmten Wertes ein Meldung anzeigen.

Dazu ist aber eine Änderung der Mailschablone notwendig.

Andreas

[Redredson]

Hi,

das Ändern des Mail-Templates wäre kein Problem, haben eh den Standard modifiziert.

Kannst du mir evtl. das Script zur Verfügung stellen ?

Redredson

[Glombi]

Hier der abgespeckte Code (nicht getestet, aber das Verfahren sollte klar sein). Das ganze arbeitet mit 2 Schwellwerten.

dim session as NotesSession
dim db as NotesDatabase   
   
   Dim DbSize As Double
   Dim DbSizeDiffThreshold1 As Double
   Dim DbSizeDiffThreshold2 As Double
   Dim SizeThreshold1 As Double
   Dim SizeThreshold2 As Double
   
   Dim SizeThreshold1_Above As Integer
   Dim SizeThreshold2_Above As Integer
   
set session = New NotesSession
set db = session.CurrentDatabase

   'Bestimme Größe der Mail-DB (Byte), berechne [MB]
   DbSize = db.Size / 1024 / 1024
   
   'Setze Schwellwerte
   SizeThreshold1 = 450
   SizeThreshold2 = 500
   
   'Berechne Differenz
   DbSizeDiffThreshold1 = SizeThreshold1 - DbSize
   DbSizeDiffThreshold2 = SizeThreshold2 - DbSize
   
   If DbSizeDiffThreshold2 < 0 Then
      SizeThreshold2_Above = True
   Else
      SizeThreshold2_Above = False
   End If
   
   If DbSizeDiffThreshold1 < 0 Then
      SizeThreshold1_Above = True
   Else
      SizeThreshold1_Above = False
   End If
   
   'Falls kleiner 0, ist Schwellwert überschritten => Meldung
   If (SizeThreshold2_Above < 0) Or (SizeThreshold1_Above < 0) Then      
         

      If SizeThreshold2_Above Then
msgbox "Die Größe Ihrer Maildatenbank hat den erlaubten Wert von " & cstr(SizeThreshold2) & " MB überschritten! Bitte löschen oder archivieren Sie nicht mehr benötigte Mails!",0+64,"Hinweis"
      Else
msgbox "Ihre Maildatenbank ist größer als " & cstr(SizeThreshold1) & " MB! Bitte löschen oder archivieren Sie nicht mehr benötigte Mails!",0+64,"Hinweis"
      End If
      
      
Andreas

[Redredson]

Hallo,

werd das Ding mal ausprobieren.

Merci !

Redredson  

[MartinG]

Ich habe die Lösung von OpenNTF bei uns in die Mailschablone eingebaut - die finde ich recht nett. Wird halt immer nur beim Öffnen von Notes aktualisiert...

Maske:

Switcher Form for Mail

Globals - Initialize

   Dim session As New NotesSession
   Dim db As NotesDatabase
   Set db = session.CurrentDatabase
   Dim size As Double
   Dim sizeinmb As Double
   Dim used As Double
   Dim quota As Double
   
   size = db.Size
   used = Round ( db.PercentUsed , 2 )
   quota = Round ( db.SizeQuota / 1024 , 2 )
   
   sizeinmb = Round (( size / 1024) / 1024 , 2 )
   
   Call Session.SetEnvironmentVar ( "ONTF_mailfilesize", Cstr ( sizeinmb )  )
   Call Session.SetEnvironmentVar ( "ONTF_mailpercent", Cstr ( used )  )
   If quota > 0 Then   Call Session.SetEnvironmentVar ( "ONTF_mailquota", Cstr (quota ) )

Und in der Maske unter dem berechneten Wert wo der User angezeigt wird einen neuen berechneten Wert erstellen mit:

Quota := @Environment("ONTF_MailQuota");
@If(Quota = "";"Speicher: "+ @Environment("ONTF_MailFileSize") + " MB";
"Speicher: " + @Environment("ONTF_MailFileSize") + "MB von " + Quota + "MB")

Gruss
Martin

PS: Sieht dann so aus wie angehängt...
PS2:  50MB halte ich allerdings für sehr sehr heftig. Ist da überhaupt noch sinnvolles arbeiten für die User möglich. Ich habe heute mit einem diskuttiert der jetzt 1,5GB Platz braucht und das Problem ist das seine Argumente wirklich nicht schlecht sind...

[Redredson]

Hi,

sowas ähnliches habe ich auch in unserer 5er Mail-Schablone. (Siehe Dateianhang). Dies reicht mir aber nicht: Besser wäre eine Benachrichtigung per Mail,wo "idiotensicher" beschreiben ist, was zu tun ist, wenn der Warnschwellenwert erreicht wird.

50 MB reichen für Standard-Udser aus. Dies sind bei uns ca. 80 % der User. Power User und Mail-In DB's sind natürlich größer.

Redredson

[MartinG]

Dateianhang?

[Redredson]

Hi,

das mit den Dateianhängen geht hier leider nicht ! ! !   Sieht aber so änlich aus.

Redredson

[Redredson]

Oh,

dann bockt nur mein Notesbook mit XP Pro....

Redredson

[theBastian]

Hi,

@MartinG

Ich finde die Lösung von OpenNTF auch genz ok. Leider scheint das Script nicht zu erkennen, wenn Quotas wieder gelöscht werden.

Bei meinen Tests wird noch immer die letzte Quota angezeigt. Kannst Du das nachvollziehen?

cu
Sebastian

[MartinG]

Nein - beim nächsten Clientneustart wird das bei mir eigentlich immer sauber übernommen...

Gruss
Martin

[Wirsing]

Werden die Quotas nicht  erst durch ein compact aktualisiert  

[MartinG]

Nein - der Compact "reduziert" nur die Dateigrösse wieder.

Gruss
Martin

[BlueFox]

Hi,

stehe vor dem selben Prob.
Bin kein Programmierer und des wegen suche ich ein Tool, das die User per Mail bei einer bestimmten Größe informiert.

Daten
Quota 100
Warnung 80
Server R654

Habe ein Tool von Lotus gefunden nur kann ich mich mit der Idee nicht anfreunden das der User z.B. 4 mal ein Popup gekommt nur weil er 4 MB über dem Warnschwellenwert ist, bei 10 MB wären es dann wohl 10 Fenster.
Das Tool von IBM http://www-10.lotus.com/ldd/46dom.nsf/55c38d716d632d9b8525689b005ba1c0/72baca7278e3eabf85256d6a00729014?OpenDocument

Vielleicht habt ihr ja eine Lösung für mich, Zugriff auf die Mailbox erfolgt nur mit dem Browser und nciht mit Notes

[MartinM]

Vielleicht habt ihr ja eine Lösung für mich, Zugriff auf die Mailbox erfolgt nur mit dem Browser und nciht mit Notes

Yep, hab ich. Domino Web Access 7

[MOD]

stehe vor dem selben Prob.
Bin kein Programmierer und des wegen suche ich ein Tool, das die User per Mail bei einer bestimmten Größe informiert.

Daten
Quota 100
Warnung 80
Server R654

Warum werden nicht die Standardfunktionalitäten von Domino genutzt?
Configuration Settings -> Router/SMTP -> Restrictions and Controls -> Delivery Controls -> Quota Controls

  MOD

[BlueFox]

Kann ich da einen x-beliebigen Text rein machen und der wird dann verschickt?
Evtl ne Ahnung wann diese Mail erzeugt wird?