Hello! The routine below works great when I send only one email. But when I send another email, I have to kill Outlook via Task Manager where it is immediately replaced by another session of Outlook and Outlooks again comes up. Any help with this greatly appreciated! Rbollinger ========================================================= Sub Send SendEmail() On Error GoTo Err_Command11_Click Dim stDocName, mTO, mCC, mSubject As String stDocName = "frmSnapShot" mTO = Forms!frmEmail!emailTO mCC = Forms!frmEmail!emailCC mSubject = Forms!frmEmail!Subject mpath = Mid(Forms!frmIssues!FolderPath, InStr(1, Nz(Forms! frmIssues!FolderPath), "#") + 1, 100) DoCmd.SendObject acReport, stDocName, , mTO, mCC, , mSubject, IIf (Forms!frmEmail!Check3 = -1, "Shared Directory:" & vbCrLf & mpath, ""), , False Exit_Command11_Click: Exit Sub Err_Command11_Click: MsgBox Err.Description Exit Sub email_error: MsgBox "An error was encountered." & vbCrLf & "The error message is: " & Err.Description Resume Error_out Error_out: End Sub