passing an argument in sendobject method - how?

[Pampers]

Hi everyone,
I'm automating sending an email (fax). In some code the technique of argument passing is used for the strLinkCriteria . How would I use this in my code?

    strReportName = "rprtInvoiceFax"

            strWhere = "BolImportID = " & Me.BolImportID

            DoCmd.SendObject acSendReport, strReportName, acFormatHTML, EmailAddress2, , , strSubject, , False

Pampers
Just let it go...

 

[JerryKlmns]

pampers

Open the report passing the WHERE clause and then dont specify the report name when sending. This shall result in sending the active report.

 

[Pampers]

Tnx Jerry for the respons,
But I dont understand what "Open the report passing the WHERE clause" means, especially "passing the WHERE clause".


Pampers
Just let it go...

 

[JerryKlmns]

strWHERE = "Skopos2='AAL'" 'Filters the report's recordset

DoCmd.OpenReport "PerProduct", acViewPreview, , strWHERE
DoCmd.SendObject acSendReport,,acFormatHTML, EmailAddress2, , , strSubject, , False

 

[Pampers]

Hi Jerry,

I understand that the strWhere clause in
DoCmd.OpenReport "PerProduct", acViewPreview, , strWHERE

But the code I copied uses it directly in the sendobject method, without first opening the report. Here is the code (

http://www.tek-tips.com/viewthread.cfm?qid=1237045):

 ' **************************************
    ' Walking through the Customers recordset until end of file, setting the global variable
    ' strInvoicesWhere to the current where and using SendObject passing
    ' customers fax number and report name.
    ' **************************************
    
    If MsgBox("Do you want to fax invoices" & Chr(13) & "to all customers using MSFax?", 4) = 6 Then
        With rstCustomers
        Do Until .EOF
            strInvoiceWhere = "[customerid] = '" & ![CustomerID] & "'" ' sets global strInvoiceWhere
            DoCmd.SendObject acReport, "rptMSFaxInvoice", acFormatRTF, "[fax:" & ![Fax] & "]", , , , , False ' Runs Report to MSFax
            .MoveNext ' Move to next record in Recordset
        Loop
        End With
    End If

Pampers
Just let it go...