adOpenDynamic
is not declared in VBScript and therefore equals Empty
, which gets converted to 0
when you assign the CursorType
property.
0
is adOpenForwardOnly
, and forward only does not support moving backwards, an ability the Find
method wants.
You should replace adOpenDynamic
with its literal value:
Recordset.CursorType = 2 'adOpenDynamic
To avoid this class of errors altogether, place Option Explicit
as the first line of your script.