VBA ACCESS error 91 object variable or with block variable not set -

in form, when pressing button called "asignar", want insert values existing table called "movimientos"

private sub asignar_click()   dim db database   dim rs dao.recordset    set rs = db.openrecordset("movimientos")   rs.addnew   rs("estatusdoc").value = "blah"   rs("foliofed").value = "blah"   rs("nombredoc").value = "blah"   rs("prel").value = "blah"   rs("curp").value = "blah"   rs.update end sub 

when press run keep showing error:

error 91 object variable or block variable not set

i think syntax little off, code should this:

private sub asignar_click()     dim db dao.database    dim rs dao.recordset     set db = currentdb    set rs = db.openrecordset("movimientos", dbopendynaset, dbappendonly)     rs.addnew    rs("estatusdoc").value = "blah"    rs("foliofed").value = "blah"    rs("nombredoc").value = "blah"    rs("prel").value = "blah"    rs("curp").value = "blah"    rs.update     rs.close     set rs = nothing     set db = nothing  end sub 

the issue way declaring , setting db variable. have adjusted openrecordset match doing.