Emailing a single record in a report

  • Thread starter Thread starter Mike
  • Start date Start date
M

Mike

Currently I have 1 table and 2 forms. 1 form is for
inputting data and the other form is for searching data.
I created a find record command button on the form to do
the search. Once I run a search and have the correct
record, is there a way to just email that single record
in a report? Thanks for the help!!!
 
Base the report off a query and take the criteria on the
key field from the form.
example
[Forms]![form name]![control name]

Jim
 
Cameo posted this earlier as an alternative

********************************************
Private Sub Button_Click()
On Error GoTo Err_Button_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "ReportName"

stLinkCriteria = "[FormID]=" & Me![FormID]
DoCmd.OpenReport stDocName, acViewPreview, ,
stLinkCriteria

Exit_Button_Click:
Exit Sub

Err_Button_Click:
MsgBox Err.Description
Resume Exit_Button_Click

End Sub

Jim
 
Back
Top