[VB6] Impostare campi di tipo Sì/No (Access) con SQL

[mardok30]

Mi dice che c'è un errore nella stringa...

Ti dice che c'è un errore perché tenti di inserire una stringa in un campo Boolean, fai così:

dim valCheck as boolean
if miaCheck.value=1 then
      valCheck=True
else
      valCheck=False
end if

sql="UPDATE miaTab SET campoSiNo=" & valCheck &" WHERE id=1"