How to run agent on all Lotus mailboxes

15 pts.
Tags:
Lotus Agents
Lotus Mail Quotas
Lotus Notes email
LotusScript
How can I run a local script to show mailbox quota size on all user mailboxes as an Administrator? Sub Initialize Dim Session As New Notessession Dim db As NotesDatabase Set db=session.CurrentDatabase Messagebox "Size quota = " & db.SizeQuota & chr(10) & _ "Size Warning = " & db.SizeWarning,, db.Title End Sub

Answer Wiki

Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

Discuss This Question: 3  Replies

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy
  • GCT
    Is there a method to run agents on multi mailboxes in general? Ideally, is there a ready-made Administrator report to show this user data? (Current Mailbox Size, Quota Size, Threshold Size.) Many Thx, GCT
    15 pointsBadges:
    report
  • Bcc
    The admin client preferences (FILE-->PREFS-->Admin Prefs-->FILES) allow you to select columns to add or remove from view in the FILES tab. Quota, Warning, & Logical size are all available. Once you have the FILES view looking the way you want to report, you can do a file-->print if you like. It does not export to a spreadsheet format (at least I have not found an option on how to do that yet). HTH
    50 pointsBadges:
    report
  • Bcc
    Just thought of this too as far as how to do it via code.... You could put this type of wrapper around the code you wish to run. It will cycle through all the DB's on the current server. Sub Initialize Set session = New notessession Set dbCurrent = session.currentdatabase Set dirList = session.Getdbdirectory(dbCurrent.Server) Set dbLookup = dirList.GetFirstDatabase(DATABASE) On Error Resume Next While Not (dbLookup Is Nothing) ****Insert what you want it to do here****** Set dbLookup = dirList.GetNextDatabase Wend End Sub BTW- the 'DATABASE' is a Notes constant. For more info, check out the GetFirstDatabase method in designer help.
    50 pointsBadges:
    report

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

Thanks! We'll email you when relevant content is added and updated.

Following