I am just writing a simple code to notify users if their currently editing emails' sizes are over the maximum outgoing email size that is set in the domino server. I put the following code in the QuerySave event of Memo, Reply, and Reply with History forms:
'disallow save if document size is over 7340032 bytes
If source.document.size > 7340032 Then
Continue = False
sorrymsg = "Sorry! The size of email exceeds the maximum limit."
exceedinKB = (source.document.size -7340032) / 1024
Msgbox( sorrymsg+" It is about " + Str(Int(exceedinKB)) + "KB over the maximum limit.")
The codes works fine, but it becomes titeous if I want to change the number 7340032 to something else, then I have to change that in all Memo, Reply, and Reply with History forms in all email databases.
Is there a way to reference the max outgoing email size value of the domino server using LotusScripts?