I am trying to refresh a data control but I keep getting the following message no matter what I try:
Run-time error 3464
Data type mismatch in criteria expression.
If I leave the where clause out I don't get the error message.
Private Sub cmdseektask_Click() Dim strsql As String, temp As Long Let temp = InputBox("enter a bidnumber:") Let strsql = "SELECT * from bids where bidno ='" & temp & "'" Let datbids.RecordSource = strsql datbids.Refresh End Sub