SQL - Problema con update

TEngo esta sentencia sql y me da error :


Set cat = New Recordset
cat.Open "Update LBA set dato=('" & Me.Lbdato1 & "') where numero =1 , Db, adOpenStatic, adLockOptimistic"
cat.Close


Dice que no es valida en este contexto..


GRacias..

pues en vez de open
se tiene que poner Execute.