Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Outlook / Programming Add-Ins / April 2004

Tip: Looking for answers? Try searching our database.

Catch delete in MailItem_Close event

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
|{arl Shtoshek - 26 Apr 2004 16:14 GMT
Hi, All!

Is there ANY way to determine if the MailItem is being deleted in its
MailItem_Close event?

I'm doing a check whether the MailItem is changed and if it is, I
display the "Do you want to save changes?" dialog (with a
MsgBox(...)). If the user chooses "Yes", I call Inspector.Close
olSave. Here "Inspector" is the wrapper class which contains the
MailItem object.

The problem is - if the MailItem is changed, but is being deleted, I'm
displaying the "do you want to save changes" dialog anyway, because I
don't know that it's being deleted.

I'm using VB6 and developing for OL2000

The code looks somewhat like this:

Private Sub m_objMail_Close(Cancel As Boolean)
 Dim iRetVal As Integer
   
 If m_objMail.Saved = False Then

   'Here I would like to know if m_objMail is being deleted

   iRetVal = MsgBox("Save changes?", vbYesNoCancel)
   Select Case iRetVal
     Case vbYes
       m_objInsp.Close olSave
     Case vbNo
       m_objInsp.Close olDiscard
     Case vbCancel
       Cancel = True
   End Select
 Else
   m_objInsp.Close olDiscard
 End If
     
End Sub

TIA,
Karls
Ken Slovak - [MVP - Outlook] - 26 Apr 2004 18:47 GMT
You could trap ItemAdd in the Deleted Items folder's Items collection but
I'm not sure if that would happen before Item_Close or during or after, and
it wouldn't fire if the user hard-deleted the item using Shift+Delete.
There's really no good way to do what you want but you can experiment with
the timing of the ItemAdd event to see if it does anything at all for you.

Signature

Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm

> Hi, All!
>
[quoted text clipped - 39 lines]
> TIA,
> Karls
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.