Salve ho questa stringa:
dim scadenza
scadenza=(Recordset1.Fields.Item("DATADISCADENZA") .Value)-1
if scadenza=now then
strsql = update mercatino set oggettiinvendita = "scadenza" where idcampo = (Recordset2.Fields.Item("id").Value)
con.execute(strsql)
end if
perche mi da questo errore?
Prevista fine istruzione
line 47, column 16
strsql = update mercatino set oggettiinvendita = "scadenza" where idcampo = (Recordset2.Fields.Item("id").Value)?
grazie

Rispondi quotando