11 messaggi dal 17 dicembre 2021
Buongiorno a tutti, ho un database con una tabella "materia_prima" in access collegato a questo file con dei campi. Mi hanno dato un compito per la tesi e non riesco a venirne a capo:
grazie a queto file aggiorno il campo quantità presente il colonna 7.. e fin quì mi funziona, ogni qual volta eseguo il file mi aggiorna la quantita ad 1. ma vorrei che ogni qual volta si esegue questo file il valore del campo "quantita" non solo si aggiorni ma si sommi al valore precedentemente presente in tabella (se possibile anche si sotragga ma con'altro file) così da avere un valore incrementale che passi da 1 a 2 a 3 a 4 e così via ( 4-3-2-1-0). alla fine vorrei avere il campo che incrementi ogni qual volta eseguo il file di "1".

questo il codice:
<%
dim intCodice
intCodice = 3
if intCodice<>"" then
dim strCode
strCode="innovatel"
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("../../mdb-database/database.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * FROM materia_prima WHERE Id="&intCodice
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
rs(7)=1
rs.update
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
<%
else
response.redirect "#"
end if
%>
310 messaggi dal 13 luglio 2005
Ciao Regista81,
se non ho frainteso, la soluzione è molto semplice, basta scrivere:

...
sql = "SELECT * FROM materia_prima WHERE Id="&intCodice
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
rs(7) = rs(7) + 1
rs.update
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
...


Fammi sapere, ciao.

Umb

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.