E-Mail Error

FREDDY67

Registered User.
Local time
Today, 11:23
Joined
Apr 23, 2007
Messages
52
In the contacts section of my db I have both home & business e-mail addresses, both have a command button to e-mail the chosen one. The problem is that if the user makes a mistake & chooses the wrong one, then closes the e-mail & selects the correct one, Outlook throws up the following error "The messaging interface has returned an unknown error. If the problem persists, restart outlook".

The code I am using is:

Private Sub cmdEMB_Click()
On Error GoTo Err_cmdEMB_Click

Dim stDocName As String

stDocName = "Empty_Report"
' DoCmd.SendObject acReport, stDocName
DoCmd.SendObject acSendNoObject, stDocName, acFormatXLS, Me!frmContactDtlSub![E-mailWork], , , , , True
Exit_cmdEMB_Click:
Exit Sub

Err_cmdEMB_Click:
MsgBox Err.Description
Resume Exit_cmdEMB_Click
End Sub


Any advice would be appreciated.

Many Thanks
Freddy
 

Users who are viewing this thread

Back
Top Bottom