I am receiving the run-time error of '3061' Too Few parameters expected 1.
Here is the code i have up to the point of the error.
Private Sub cmdShowLots_Click()
Dim intX As Integer
intX = DCount("fldOwnerID", "tblLots", "fldCustomerID ='" & Me.fldCustomerID & "'")
If intX = 0 Then
MsgBox "This customer does not own a lot."
Else
Dim strGetLots As String
strGetLots = ("Select * from tblLots Where fldCustomerID = " & Me.fldCustomerID)
Dim Db As Database
Set Db = CurrentDb
Dim rsLots As DAO.Recordset
Set rsLots = Db.OpenRecordset(strGetLots)
Thanks