eccomi qui... allora questo è il prodotto ottenuto con successo...
Ovviamente mi perdo in alcuni passaggi, devo aggiornare anche il campo totale di una tabella relazionata chiamata carico ed il campo tot_carico, questa tabella mi tiene lo storico di tutti i carichi effettuati nel tempo, giusto per farmi due conti ogni mese, c'è un modo per aggiornare anche quel campo?codice:<% dim intCodice intCodice = request("ID_merc") if intCodice<>"" then dim strCode strCode="innovatel" Set Conn=Server.CreateObject("ADODB.Connection") strConn="driver={Microsoft Access Driver (*.mdb)}; " strConn=strConn & " DBQ=" & Server.MapPath("magazzino.mdb") strConn=strConn & ";pwd=" & strCode Conn.Open strConn sql = "SELECT * FROM merce WHERE ID_merc=" &intCodice Set rs = Server.CreateObject("ADODB.Recordset") dim qta, pr, tot_new qta= request.form("Quantita") pr= request.form("Prezzo") tot_new= (qta * pr) rs.Open sql, conn ,3,3 rs(1)=request.form("codice") rs(2)=request.form("lotto") rs(3)=request.form("descrizione") rs(4)=qta rs(5)=request.form("Numero") rs(6)=request.form("N° Bolla") rs(7)=request.form("Scadenza") rs(8)=request.form("Fornitore") rs(9)=pr rs(10)= tot_new rs.update set rs = Nothing conn.Close set conn = Nothing response.redirect "visualizza_magazzino.asp" else response.redirect "visualizza_magazzino.asp" end if %> <body> </body> </html>
grazie a tutti!

Rispondi quotando