Solved

warning message before sending email with excel file

Posted on 2014-03-10
4
275 Views
Last Modified: 2014-03-26
Hi Everyone,

We are looking for a solution where an employee is sending out an email to external party with excel file attached and they should get a pop up question "Are you sure you would like to send this email with excel file"

We have exchange 2007 and would like to know if there is third party software or exchange has this type of feature. Please let me know as we need this asap.

Thanks
0
Comment
Question by:skyjumperdude
  • 3
4 Comments
 
LVL 49

Expert Comment

by:Rgonzo1971
ID: 39918238
Hi,

I know about this one but you cannot discriminate sending an email with or without attachments as far as I know.

http://www.safesendsoftware.com/get-it.html

Regards
0
 
LVL 49

Expert Comment

by:Rgonzo1971
ID: 39918277
Hi,

this code would probably do it

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

Dim intRes As Integer
Dim strMsg As String

bExcelAttachment = False
Set myAttachments = myItem.Attachments
'if there are some...
If myAttachments.Count > 0 Then
    For i = 1 To myAttachments.Count
        If myAttachments(i).DisplayName Like "*.xls*" Then ' is Excel file
            bExcelAttachment = True
            Exit For
        End If
    Next i
End If
If bExcelAttachment = True Then
    strMsg = "Are you sure that you would like to send this email with excel file?"
    intRes = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "Confirm Send ")
    If intRes = vbNo Then
        Cancel = True
    End If
End If
End Sub

Open in new window

Regards
0
 
LVL 1

Author Comment

by:skyjumperdude
ID: 39918414
Hi Rgonzo1971,

Thank you for your quick response. What do you mean by "I know about this one but you cannot discriminate sending an email with or without attachments as far as I know."?

Where would I insert that code?
0
 
LVL 49

Accepted Solution

by:
Rgonzo1971 earned 500 total points
ID: 39919774
Hi,

the code should be entered in the ThisOutlook Module with Alt-F11 and the Security level should be at medium, (ask before running Macros)

for a mor detailed description on how see
http://www.slipstick.com/developer/how-to-use-outlooks-vba-editor/

Regards
0

Featured Post

Optimizing Cloud Backup for Low Bandwidth

With cloud storage prices going down a growing number of SMBs start to use it for backup storage. Unfortunately, business data volume rarely fits the average Internet speed. This article provides an overview of main Internet speed challenges and reveals backup best practices.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Following basic email etiquette rules will help you write a professional email and achieve a good, lasting impression with your contacts.
In this step by step procedure, you will come to know the details of creating an Outlook meeting in 2007, 2010, 2013 & 2016.
In this video we show how to create an Accepted Domain in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.: First we need to log into the Exchange Admin Center. Navigate to the Mail Flow >> Ac…
In this Micro Video tutorial you will learn the basics about Database Availability Groups and How to configure one using a live Exchange Server Environment. The video tutorial explains the basics of the Exchange server Database Availability grou…

815 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

7 Experts available now in Live!

Get 1:1 Help Now