ciao a tutti,
sto sviluppando un programma di gestione magazzino e sto usando un db con diverse tabelle(prodotti,vendite,acquisti).
Quello che mi interessa è che ogni volta che si verifica una vendita o un acquisto automaticamente viene aggiornata la quantità di scorta presente nella tabella prodotti.
Per quanto riguarda gli acquisti non ho avuto problemi.

Ho invece un problema di aggiornamento nel momento in cui si verifica una vendita, visto che prima devo verificare che la scorta presente sia sufficiente.

Segue la parte di codice che dovrebbe effettuare tale verifica:

codice:
'Verifica della quantità di prodotto disponibile
selezione = "select scorta from prodotto where idprodotto= " + Text4 + ";"
db.Execute selezione

If scorta >= Text6 Then
inserimento = "insert into vendite (idprodotto, idcliente, data, quantita, prezzo, iva, sconto) values ( '" & Text4 & "', '" & Text2 & "', '" & Text8 & "', '" & Text6 & "', '" & Text5 & "', '" & Text7 & "', '" & Text9 & "');"
db.Execute inserimento

'Aggiornamento tabella prodotto
aggiornamento = "Update Prodotto set Scorta = Scorta - " + Text6 + " where idprodotto = " + Text4 + " "
db.Execute aggiornamento

Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Text5 = ""
Text6 = ""
Text7 = ""
Text8 = ""
Text9 = ""

Else
MsgBox "Disponibilità " & "" & Text3 & "" & " insufficiente. Quantità disponibile" scorta
End If



grazie