this thread is now complete and all issues solved. I ended up using the following code for the search button:
Private Sub Command7_Click()
Dim strCriteria As String
If Len(Me.Volume & vbNullString) > 0 Then
strCriteria = strCriteria & "[Volume] = " & Me.Volume & " AND "
End If
If Len(Me.Title & vbNullString) > 0 Then
strCriteria = strCriteria & "[Movie Title] LIKE '*" & Me.Title & "*' AND "
End If
If Len(Me.Rating & vbNullString) > 0 Then
strCriteria = strCriteria & "[Rating] = '" & Me.Rating & "' AND "
End If
If Len(strCriteria) < 1 Then
MsgBox ("Please enter search criteria before attempting to search the database")
Else
strCriteria = Left(strCriteria, Len(strCriteria) - 5)
If DCount("*", "search", strCriteria) = 0 Then
MsgBox "No movies matching your search. Please refine your search and try again."
Exit Sub
Else
DoCmd.OpenForm "search results"
End If
End If
End Sub
Hopefully this might help someone else.
All the "like" criteria that allow the searches to be done with parial entries are found in the query.
Bookmarks