Emailing with a Single Report in attached pdf.

[Tonyb123]

Hi,
Send object code works well to attach a pdf file to an email from a button click on a form.
The issue I'm having, is the attached pdf contains several reports, and not just the "current open form" report.
How can I modify the code below to only send the report that relates to the open form?
Thankyou

 Private Sub EmailBtn_Click()
On Error GoTo ErrHandler
DoCmd.SendObject acSendReport, "HoseTestReport", acFormatPDF, Forms!frmHoseDetails!EmailAddress, , , _
" Hose Test Details " & TestSerial & " Attached ", "Please find your Hose Test Report attached."
Exit Sub
ErrHandler:
    If Err = 2501 Then
        ' User canceled the message - ignore this
    Else
        ' Report the error
        MsgBox Err.Description, vbExclamation
    End If
End Sub

[Welshgasman]

Create the correct report first?

[Tonyb123]

Hi Welshgasman,

The Report with the correct Serial ID opens for printing correctly, this works as expected. It's only when using the emailing button on the "frmHoseDetails" form that all the saved records are loaded into a single pdf attachment. I.e. the pdf has multiple reports sitting in the pdf browser.

Thankyou

[June7]

How does report print for correct record(s)?

What do you mean by relates to "current open form"? Code outputs report you name. Do you need to filter it?

Options:

1. Report bound to query that has filter criteria referencing form control for parameter

2. Report Filter property references form control for criteria and FilterOnLoad set to yes

3. Open report filtered to desired record(s) with WHERE argument of OpenReport then run SendObject.
DoCmd.OpenReport
DoCmd.SendObject
DoCmd.Close

[Tonyb123]

Hi June7,

Thank you for you reply. I agree there is a filtering issue. Additional test: I setup a button on the reports form:[] DoCmd.OpenReport "HoseTestReport", acViewPreview [\] and noted the wrong report opens. If I use a button for a print macro, it opens the correct record for printing. The report has been tested bound to a query and also the forms table. Both yield the same result, wrong record.
One of your suggestions was to setup filter criteria in the reports query. Please provide an example of the query filter so I can give it a test. Every record has a unique number "TestSerial"

Thankyou.

[June7]

Don't really understand much of that. How can it be "wrong report"? It can only open what you tell it to. Do you mean wrong record?

Is this what you asked for?

SELECT * FROM sometable WHERE TestSerial=Forms!myformname!mytextboxname


If you want to provide db for analysis, follow instructions at bottom of my post.

[Tonyb123]

Hi June7,

Solved. The form had a glitch. Set the form property Popup to "No" and everything is working correctly. I.e. Reports only show the open form record. Emailed pdf also only displays the form record and no others.

Possibly the glitch was caused by some vba code i have to prevent form edits. The user must push a button to edit records on the form. The code also changes the tab form name to EDIT Mode. What I hadn't realized was the form name was now slightly different to the browser form name possibly causing issues with the form filtering. Hope that makes sense.

Thanks for your time on this.

[Welshgasman]

I believe if the filtering cannot be realised, then it is ignored. That is probably the reason now you have mentioned this.
Could always test using the correct naming path for when the tab gets changed?