Run-time error '3251'

[Guest]

I am getting this error message at the FindFirst call in the following code.
Run-time error '3251':
Operation is not supported for this type of object.

Sub FillOneLCdetails(lcID As Long)

Dim rstTSV As DAO.Recordset
Dim strSQL As String

Set rstTSV = CurrentDb.OpenRecordset("LaneChangeDetails")

If rstTSV.EOF = False Then
strSQL = "[ID] = " & lcID
rstTSV.FindFirst strSQL
If rstTSV.NoMatch Then
MsgBox "No records found with " & strSQL
End If
'..... etc .....


MS DAO 3.6 Object Library is checked in Available References

Can someone tell me what's wrong?
(The strange thing is that the same code was working last year, I don't
understand...)

Thanks

 

[Brendan Reynolds]

If 'LaneChangeDetails' is a local (not linked) table, then you'll need to
specify the recordset type ...

Set rstTSV = CurrentDb.OpenRecordset("LaneChangeDetails", dbOpenDynaset)

The default for local tables is dbOpenTable, which results in a recordset
that does not support FindFirst. The default for linked tables and for
queries is dbOpenDynaset, which may explain why similar code has worked for
you before.