Ho una maschera per inserimento ordinazioni dove è possibile inserire il codice (Codice) di un prodotto e la quantità acquistata (Ordinati). I dati inseriti vanno a popolare delle normali List che scorro tramite un ciclo for next. La procedura qui riportata mi è sembrata la più semplice da un punto di vista di programmazione, ho idea che non sia certo la migliore a livello di prestazioni!!
Qualche idea su come alleggerire il lavoro sul database? (Access 2000, ADO 2.8 e Jet 4.0)
codice:
For i=0 to 20
SQL = "SELECT Ordinati,Scorte FROM TblOrdini where Codice='" & ListCodice.List(i) & "'"
Rs.Open SQL, connectString
ordinati_vecchio = Rs("Ordinati")
ordinati_nuovo = ordinati_vecchio + ListQuantita.List(i)
scorte_vecchio = Rs("Scorte")
scorte_nuovo = scorte_vecchio - ListQuantita.List(i)
Rs.Close
SQL = "UPDATE TblOrdini set Ordinati='" & ordinati_nuovo & "',Scorte='" & scorte_nuovo & "',ultimoOrdine='" & ora & "' where Codice='" & ListCodice.List(i) & "'"
Cn.Execute SQL
Next i
Grazie per l'aiuto!!