This event is executed directly when the delivery of a message has started. The event is executed before any global rules are executed
OnDeliveryStart(oMessage as hMailServer.Message)
VB-script:
Sub OnDeliveryStart(oMessage)
If oMessage.Size > 1000000 Then
' This message is to big. We should not
' deliver it.
Result.Value = 1
Else
' Accept the message
Result.Value = 0
End If
End Sub