How to include an OrderID number in the subj. line of an email

[dragongunner0351]

Hello all, I have a report that is emailed out of my database in snapshot format, I would like to automatically include the OrderID number of the order in the subject line of the email. Any help is greatly appreciated

 

[Remou]

How is the report emailed? Where is it emailed from?

 

[dragongunner0351]

I am emailing from a form via a command button my email program is outlook

Here is the code on the button:
Private Sub EmailWOREQ_Click()
Dim stDocName As String

stDocName = "WO REQ"
DoCmd.OpenReport stDocName, acPreview, , "[OrderID] = Forms![Orders].form![OrderID]"
DoCmd.SendObject acReport, stDocName, "Snapshot Format", "someone@somewhere.com", "someoneelse@somewhere.com", , "A work order request has been sent.", "Please see attached file"

End Sub

 

[Remou]

Try:

Private Sub EmailWOREQ_Click()
Dim stDocName As String

    stDocName = "WO REQ"
    DoCmd.OpenReport stDocName, acPreview, , "[OrderID] = Forms![Orders].form![OrderID]"
    DoCmd.SendObject acReport, stDocName, "Snapshot Format", "someone@somewhere.com", "someoneelse@somewhere.com", , "A work order request has been sent: " & Forms![Orders].form![OrderID], "Please see attached file"

End Sub

 

[dragongunner0351]

Worked Great Thank You!