inserimento doppio

[pip19]

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

[pip19]

ehm...

qualcuno puo' aiutarmi???

Grazie mille!

[jonnyl]

scusa io vedo 2 inserimenti nella tabella generali e una nella tabella generali storico che significa doppio inserimento????

Lo hai settato tu un doppio inserimento in generali guarda le stringhe sql :master:

[pip19]

scusa ma dove le vedi due insert??

'QUESTA E' UNA NORMALE SELECT
----------------------------------
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
----------------------------------

'QUESTO E' UN UPDATE
--------------------------------------------
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")


'QUESTA E' LA INSERT
--------------------------------------------
'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