Limit maximum number of CC: recipients

The more I think about this, the more I think it would be possible with a custom Outlook add-in. Does anyone have an opinion on this?

Locate the following key in the registry:

HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\MSExchangeIS\
ParametersSystem


On the Edit menu, click Add Value, and then add the following
registry value:

Value Name: Max Recipients on Submit
Data Type: REG_DWORD
String: A value equal to the max. recipients you
wish to allow
Quit Registry Editor.

This limit also applies to messages transferred into the store by the
Internet Mail Service. An event 4117 is logged and the message is moved to the Archive folder.   The message is not delivered and it does not send a non-delivery report.

If a user attempts to send a message to more recipients than is designated by the Max Recipients on Submit parameter and the user has the new Emsmdb(32).dll, the following error message may be displayed when the user attempts to send the message:
The item could not be sent. The number of recipients on this message
exceeds the upper limit configured by the administrator.


If a user attempts to send a message to more recipients than is designated by the Max Recipients on Submit parameter and the user DOES NOT have the new Emsmdb(32).dll, the following error message may be displayed when the user attempts to send the message:
The item could not be sent. The client operation failed.

So ... it looks like if you want to set it per user, you may have to do the registry key.  You can edit another persons registry hive as long as they are logged out.

http://support.microsoft.com/kb/q126497/

Or you can set it in exchange, which is always a good idea to prevent people from sending to everybody when they aren;'t allowed to use specific distro lists.

regards

Sorry I don't think you've understood what I need to do - I need to limit the number of TO and CC recipients, but not BCC. I know how to restrict the total number of recipients but this is too restrictive for what I need.

You're right.  You would probably have to code it.  You can't limit the number of "to" or "cc" but not limit the numebr of "bcc".  It's kind of all or nothing.

Post a question or pointer in the outlook section.  There's a couple of guys there that do some awesome outlook coding.  BlueDevilFan is one of my heros.

SB and I are doing essentially hte same thing, just in slightly different ways.  I opted not to split the To and CC lines because a user can opt to use commas as delimiters in addition to semicolons.

I started out that way...(you've taught me well ;^)

I wouldn't think you'd need the case for BCC there?

Sounds good to me, thanks very much.

I think the way I'll do it is via an Outlook add-in, as it's a good compromise between being somewhat covert (if only a bit) and doesn't require such a steep learning curve as Exchange event sinks. Just done a bit of reading on those and they sound quite daunting!

I'll split the points to reflect your contributions. Thanks again.

.... but before I do, sirbounty has a point there!

Why the extra case for BCC? We're not interested in how many BCC recipients there are in this case?

I think it was inadvertently placed...and easily removed - though it wouldn't cause any harm...just a miniscule bit of counter processing...

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim olkRecipient As Outlook.Recipient, _
        intTo As Integer, _
        intCC As Integer, _
        intBCC As Integer
    If Item.Class = olMail Then
        For Each olkRecipient In Item.Recipients
            Select Case olkRecipient.Type
                Case olTo
                    intTo = intTo + 1
                Case olCC
                    intCC = intCC + 1
'                Case olBCC
'                    intBCC = intBCC + 1
            End Select
        Next
        If (intTo > 10) Or (intCC > 10) Or ((intTo + intCC) >= 15) Then
            MsgBox "You are only allowed 10 address on the To and CC lines, or 15 between the two.", vbCritical + vbOKOnly, "Message Not Sent"
            Cancel = True
        End If
    End If
    Set olkRecipients = Nothing
End Sub

Thought so. Good work. Thanks.

My heroes!!!

Yeah, there's no need for the BCC counter.  I put it there both to illustate that it's available and in case you wanted to use the count for some purpose.  It also makes for nice symmetry.

Yeah, that's true, can't argue with the symetry. Perfect feng-shui!

How do we get this code working in Outlook?  Could you provide specific procedure, thanks!!!

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim olkRecipient As Outlook.Recipient, _
        intTo As Integer, _
        intCC As Integer, _
        intBCC As Integer
    If Item.Class = olMail Then
        For Each olkRecipient In Item.Recipients
            Select Case olkRecipient.Type
                Case olTo
                    intTo = intTo + 1
                Case olCC
                    intCC = intCC + 1
'                Case olBCC
'                    intBCC = intBCC + 1
            End Select
        Next
        If (intTo > 10) Or (intCC > 10) Or ((intTo + intCC) >= 15) Then
            MsgBox "You are only allowed 10 address on the To and CC lines, or 15 between the two.", vbCritical + vbOKOnly, "Message Not Sent"
            Cancel = True
        End If
    End If
    Set olkRecipients = Nothing
End Sub