Is there a way to detect a send event from outlook? 1

[datenis]

Is there a way for VB to detect an event when the client clicks send on an outlook message, and then return information such as From, To, CC:, Body etc?

thx,

-d

 

[Giordano]

I know 2 methods to catch the outlook events:
1. Create VB add in
2. You can use custom rules(but it is quite a difficult code and very non friendly but possible)

Hope it help you.

 

[datenis]

Can you give an example?

 

[Giordano]

How to write add-ins for MS Office programs - you can find in

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnoxpta/html/odc_comaddinvb6.asp

About custom rules:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnout2k2/html/odc_novoltips.asp

Hope it will help
have a nice day.

 

[strongm]

Er...for simple stufff such as catching an email being sent you don't need to do an add-in or a custom rule...

Option Explicit
Private WithEvents myOutlook As Outlook.Application

Private Sub Form_Load()
    Set myOutlook = GetObject(, "outlook.application")
End Sub

Private Sub myOutlook_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim myMailItem As MailItem
    Dim myRecip As Recipient
    
    Set myMailItem = Item
    With myMailItem
        Debug.Print .To
        Debug.Print .CC
        Debug.Print .Subject
        Debug.Print .Body
    End With
End Sub

 

[datenis]

Exactly what I was looking for

StrongM thanks dude!

-d