ho fatto questa prova e mi da errore run-time 3001

rs_temp.Filter = rs_temp!id = 1