Hi..I'm using this code to send a snapshot attachment by e-mail, it work fine the first time but when I try to send it again, appear a message that reads "Error in EMailRptBtn_click()in Orders.form, Error # 2046, The command or action 'OutputTo' isn't available now. anybody can help me, I will appreciate so much. _____________________________________________ Private Sub EMailRptBtn_Click() On Error GoTo ErrHandler Dim rpt As Report Dim sRptName As String Dim sMsg As String Dim stdomail As String sRptName = "rptSingleOrder" sMsg = "Please confirm if this Order Quotation is correct with " & _ "Product Name, DescripciÃ³n & price!!" stdomail = Me![SupplierID].Column(2) 'This column has the e-mail address DoCmd.OpenReport sRptName, acViewDesign Set rpt = Reports(sRptName) rpt.RecordSource = "SELECT * " & _ "FROM [OrdersQueryInvoice1] " & _ "WHERE (OrderID = " & Me!OrderID.Value & ");" DoCmd.Close acReport, sRptName, acSaveYes DoCmd.SendObject acSendReport, sRptName, acFormatSNP, _ stdomail, , , "Order Quotation", sMsg, True CleanUp: Set rpt = Nothing Exit Sub ErrHandler: If (Err.Number <> 2501 Or 2046) Then ' User didn't cancel E-Mail. MsgBox "Error in EMailRptBtn_Click( ) in" & vbCrLf & _ Me.Name & " form." & vbCrLf & vbCrLf & _ "Error #" & Err.Number & vbCrLf & vbCrLf & Err.Description End If Err.Clear GoTo CleanUp End Sub _____________________________________________________ ldiaz thanks.