if idannunci<>"" then
SQL_State = "Select stato from tTestAnnunci where id = '"&IdAnnunci&"'"
Set RS = conn.execute(SQL_State)
if uCase(RS("Stato")) = "ATTESA" then
SQL = "Insert into tRichiestePubblicazioni (data,id,stato) values ('"&date&"','"&IdAnnunci&"','"&stato&"')"
conn.execute(SQL)
SQL_update = "Update tTestAnnunci set stato = 'transazione' where id = '"&IdAnnunci&"'"
conn.execute(SQL_update)
end if
Lo so ragazzi, non è interessante ma questo è il mio ctrl v quando ho aperto il forum....testmonianza che stavo lavorando e mi ero rotto!!!