Ik heb het volgende:
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMe As Recipient
Set objMe = Item.Recipients.Add("myaddress@mydomain.dom")
objMe.Type = olBCC
objMe.Resolve
Set objMe = Nothing
End Sub
Dit zorgt ervoor dat er een kopie verzonden wordt naar een specific adres.
Dit werkt uitstekend, alleen zou ik graag willen dat dit alleen gebeurt als er vanaf een specific adres iets gestuurd wordt.
Bijv. als ik in FROM type hallo@mydomain.dom dan moet bovenstaande wel gebeuren, maar als ik in FROM een ander adres type dan niet.
Weet iemand hier de aanvullende code voor
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMe As Recipient
Set objMe = Item.Recipients.Add("myaddress@mydomain.dom")
objMe.Type = olBCC
objMe.Resolve
Set objMe = Nothing
End Sub
Dit zorgt ervoor dat er een kopie verzonden wordt naar een specific adres.
Dit werkt uitstekend, alleen zou ik graag willen dat dit alleen gebeurt als er vanaf een specific adres iets gestuurd wordt.
Bijv. als ik in FROM type hallo@mydomain.dom dan moet bovenstaande wel gebeuren, maar als ik in FROM een ander adres type dan niet.
Weet iemand hier de aanvullende code voor