Search results

Add this code to your button To apply filter : DoCmd.ApplyFilter , "Your Criteria" To show all records : DoCmd.ShowAllRecords

There is nothing wrong with your program. I can run all your report on employer's history although payment field is not touched. Have you tried to run your program on another computer?

i put the above code on the on load event

DoCmd.Close acForm, Me.Name

Dim MyString MyString = Split("EnchSG100ml+RomaSH50ml,", "+", -1, 1) ' MyString(0) contains "EnchSG100ml". ' MyString(1) contains "RomaSH50ml,".

1. Try to make another new form using form wizard.Put from the available fields to selected fields (from 2 tables). 2. Try make relationship between 2 tables.

In your report : Private Sub Report_NoData(Cancel As Integer) MsgBox "No Data.", vbInformation Cancel = True End Sub In your form : On Error GoTo Err_cmdPrint_Click 'your command to opent report Exit_cmdPrint_Click: Exit Sub Err_cmdPrint_Click: If Err = 2501 Then '...