Inserimento record con APOSTROFI - ACCENTI ecc.

[md76]

inserisco i miei nuovi record in questa maniera:

Set DB = OpenDatabase("c:\database\dati.mdb", False, False, "; pwd=mia password")

sql = "INSERT INTO Archivio (Codice,Nominativo,Indirizzo,) VALUES ('" & txtCodice.Text & "','" & txtCognome.Text & "','" & txtIndirizzo.Text & "',)"

DB.Execute sql

OK!! Quando pero' inserisco un nominativo con accenti o apostrofi il progr. mi genera errore run time 3075 errore di sintassi.

Cosa ho sbagliato?

[xegallo]

le mparole apostrofate non vanno daccordo con sql raddoppia l'apostrofo

if instr(text1.text, "'")>0 then
    text1.text = replace(text1,"'","''")
end if