Open Report Form Button

[zmbaker]

I am trying to add a button to my form that opens a report for the current record being shown on the form but I am having no such luck. Any Ideas on how to do this easily?

[June7]

What have you tried? Why doesn't it work - error message, wrong results, nothing happens?

Something like:

DoCmd.OpenReport "report name", , , "ID=" & Me.ID

[zmbaker]

This is currently what I have and it just returns the report unfiltered

OpenReport
Report Name:PurchaseOrder
View: Report
Filter Name:
Where Condition: "[TVCNo]=" & [Reports]![PurchaseOrder]![TVCNo]

[ranman256]

Turn the wizard on, (on the toolbox , push the magic wand in)
grab a button, drag it to the form
it will ask you questions..select reports, the pick your report.

When its done you can look at the code behind the button.

[June7]

Should reference the form, not report, as parameter: [Forms]!formname]!TVCNo

Is TVCNo a number or text type field? If text, need apostrophe delimiters:

Where Condition: "[TVCNo]='" & [Forms]!formname]!TVCNo & "'"

[zmbaker]

That did not work, it still only populates all of the records on the report, rather than the current record.

[June7]

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

[azhar2006]

Private Sub cmdPrintPreview_Click()
Dim strReportName As String
Dim strCriteria As String
If NewRecord Then
MsgBox "aaaaaa." , vbInformation, "aaaaaa"
Exit Sub
Else
strReportName = "RptInvoice"
strCriteria = "[OrderDateID]= " & Me![OrderDateID]
'strCriteria = "[lngSalespersonID]='" & Me![lngSalespersonID] & "'"
DoCmd.OpenReport strReportName, acViewPreview, , strCriteria
End If
End Sub

[zmbaker]

VSC Master Database.beta - Copy.zip

I have attached the DB alot of information has been removed but i believe that form and report still work together, thanks for your help through this matter.

[azhar2006]

OK
Look at this