Oggi i miei problemi non finiscono piu'...

questo frammento mi fa un corretto update alla prima tabella
ma un doppio inserimento nell'altra...

come diavolo lo risolvo??

'recupero i dati dallo storico
id = request.querystring("id")
indirizzo = replace(request.querystring("indirizzo"),"%20", " ")

sql = "SELECT * FROM CONTATTI_GENERALI WHERE id="&id
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn
storicoindirizzo=rs("indirizzo")
rs.Close()
Set rs=Nothing

'AGGIORNO LA CONTATTI GENERALI - OK
sql = "SELECT * FROM CONTATTI_GENERALI WHERE id="&id
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 1, 3

rs("indirizzo")=indirizzo
rs.update()

rs.Close()
Set rs=Nothing

storicodata= Now()
storicoutente = request.cookies("cookiegest")("id")

'INSERISCO IN CONTATTI GENERALI STORICO - NON FUNGE
sql="Select * From CONTATTI_GENERALI_STORICO"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open sql, conn, 2, 3

rs.addnew
rs("id")=id
rs("indirizzo")=storicoindirizzo
rs("dataultimamodifica")=storicodata
rs("idutenteultimamodifica")=storicoutente
rs.update()

rs.Close()
Set rs=Nothing