@ J.Lankart: anzichè i comandi ADO:

codice:
rs.AddNew
rs("campo1") = campo1
rs("campo2") = campo2
rs("campo3") = campo3
rs("campo4") = campo4
rs("campo5") = campo5
rs.Update
Usa la classica INSERT SQL.