View Single Post
  #1  
Old October 15th 07, 10:29 AM posted to microsoft.public.outlook.program_vba
Kenny
external usenet poster
 
Posts: 22
Default open event problem

Hi,
I made a function which handles the open event for a mailitem
Seems to work pretty well, but now that I look closely, I found out that
it's not working that well.

Some time I will see that the function is launch and other time not for no
reason I just keep clicking on different mailitem and work and not work, here
is my function

Private Sub oMailItem_Open(ByRef cancel As Boolean) Handles oMailItem.Open
cancel = False
Try
If (oMailItem.ConversationIndex "") Then
If (My.Settings.UseSocket) Then
oSender.MailOpened(oMailItem)
End If
End If
Catch ex As SystemException
oLog.Add(ex.Message, "SystemException", "mregulatorAddin.vb",
"oMailItem_Open")
End Try
End Sub
Ads