SoloCodigo

Hola gente!

la cosa es asi, yo tengo en una base de datos dos tablas, una que tiene los productos, con su codigo de barra costo etc etc y en el form hay unos text.text que me muestran esos datos cuando los busco por codigo o nombre, la cosa es que quiero poner un boton que diga vender, y me copie todo lo que hay en esos text a la otra tabla, yo probe con esto y no anduvo

Codigo y pendrive son dos nombres de columnas en la base de datos, pero me dice que le falta una funcion o una variable

Private Sub cmdVender_Click()

With Adodc2.Recordset.AddNew
!Codigo = Text1.Text
!Pendrives = Text2.Text

End With

Adodc2.recodset.Update
Adodc2.Refresh
End Sub

desde ya muchas gracias