Originariamente inviato da mauro1985
stringasql = "Insert into Telefonino(ean,modello,sms) values('"
stringasql = stringasql & textean.Text & "'" & ","
stringasql = stringasql & textmodello.Text & "'" & ","
stringasql = stringasql & -1 & "'" & ")"
Sospetto che la tua stringasql contenga qualche errore, ma è difficile leggere il TUO codice, dato che non rispetti il Regolamento che prevede di racchiudere il codice tra gli appositi tag.

Prima di eseguire l'Execute stampati la stringa:
codice:
Debug.Print  stringasql
e capirai dov'è l'errore.

Originariamente inviato da mauro1985
Ho letto l'articolo e devo dire che mi ha illuminato parecchio sul funzionamento dei parametri ADO da me mai utilizzati, l'unica mancanza nell'articolo è su come passare proprio il tipo di dato di cui ho bisogno io
Evidentemente ti è sfuggito, usando la routine SetADOParameter NON serve più indicare il tipo, lo ricava da solo.
Per passare il valore, usando i Parametri, puoi scrivere True, -1 oppure 1.
L'importante è che non sia False o 0 (zero).
Ci pensa poi il Command di ADO ad passare al db il dato nel tipo corretto.