Salve a tutti...
ho un problema di proporzioni bibliche, primo perchè non mi genera nessun errore, poi perchè non riesco a trovare nessun "precedente" sui motori di ricerca classici.
In sostanza accade questo:
- inserisco i dati su delle text di un form
- faccio il submit del form UNA VOLTA SOLA (giuro che non mi "scappa" il ditino)
- vado in tabella e..."magia"...2 record uguali in tutto e per tutto, tranne l'ID che, essendo contatore, si incrementa di 1 nella seconda riga "magicamente" inserita.
Premetto:
- il DB è ACCESS 2003
- utilizzo DREAMWEAVER 8 (ma questo è ovviamente irrilevante)
- sistema operativo Windows XP Profesional SP 2
- IIS versione 5.1
Posto il codice della pagina che effettua il SUBMIT:
__________________________________________________ _________________________
<%
dim stringaconn
dim sql
dim rs
dim conn
dim Numero_Fattura
dim Sigla
dim Soggetto
dim Oggetto
dim Data_Emissione
dim Data_Saldo
dim Importo
dim IVA
dim Sconto
dim Totale
dim Saldato
dim Note
dim Pagamento
dim Se_saldata
dim Tabella
Set conn = server.CreateObject("ADODB.connection")
Set rs = Server.CreateObject("ADODB.Recordset")
RS.CursorLocation = 1
RS.CursorType = 1
RS.LockType = 3
stringaconn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.MapPath(".") & "/writable/nomedb.mdb"
conn.Open stringaconn
Numero_Fattura=request.form("Numero_Fattura")
Soggetto=request.form("Soggetto")
Oggetto=request.form("Oggetto")
Data_Emissione=request.form("Data_Emissione")
Data_Saldo=request.form("Data_Saldo")
Importo=cdbl(request.form("Importo"))
IVA=request.form("IVA")
Sconto=cdbl(request.form("Sconto"))
Totale=(Importo-Sconto)+(((Importo-Sconto)* iva)/100)
Saldato=request.form("Saldato")
Note=request.form("Note")
Pagamento=request.form("Pagamento")
sql="Select * from fatture_passive where id=0 ”
rs.Open Sql, conn
rs.addnew
rs("Data_Emissione")=trim(ucase(Data_Emissione) & "")
rs("Data_Saldo")=trim(ucase(Data_Saldo) & "")
rs("Numero_Fattura")=trim(ucase(Numero_Fattura) & "")
rs("id_fornitore")=trim(ucase(Soggetto) & "")
rs("Oggetto")=trim(ucase(Oggetto) & "")
rs("Importo")=Importo
rs("IVA")=IVA
rs("Sconto")=Sconto
rs("Totale")=Totale
rs("Saldato")=SALDATO
rs("Note")=trim(ucase(Note) & "")
rs("Pagamento")=trim(ucase(Pagamento) & "")
rs.update
rs.close
set rs=nothing
set conn=nothing
response.redirect "fatture_passive.asp”
%>
__________________________________________________ ____________________________--
Non è un codice da purista o da professionista…sicuramente molto elementare, ma funziona … anche “troppo” bene…riesce a fare addirittura il doppio del lavoro che gli si chiede !!!
Premetto che ho comunque provato anche con la classica “Insert Into [tabella] values (campo1,campo2, ecc…)” ma sempre lo stesso identico risultato: 2 record uguali in tutto e per tutto .
Sono 2 giorni che impazzisco su queste 30 righe di codice…ho veramente bisogno di sapere se a qualcuno è successo qualcosa del genere o se magari qualcuno con più esperienza e conoscenza di me in materia riesce a vedere l’errore che io non trovo.
Grazie del tempo che mi dedicherete e complimenti per il forum…per me una Bibbia!!!
Maurizio.

Rispondi quotando