UPDATE non mi aggiorna la tabella nel database Access

[optime]

indentare

invece di

for i=1 to 100
k=i
next

il codice indentato è

for i=1 to 100
   k=i
next

più leggibile no?

esitono dei tool on line che lo fanno per te

[optime]

comando.Parameters.AddWithValue

qui https://learn.microsoft.com/it-it/dotnet/api/system.data.sqlclient.sqlparametercollection.addwi thvalue?view=dotnet-plat-ext-8.0 la sintassi, confrontala con quello che hai scritto

[Trafiltecno]

Si hai ragione è più leggibile, hai ragione.
ho verificato il mio comandp.Par0meters.AddWithValue e mi sembra giusto...anche perche non mi da nessun errore...unica pecca la tabella access non viene aggiornata..ho provato a riscrivere alcuni campi rendendoli numerici invece di stringhe, ma nulla...

[optime]

poi, qui...

For Each row As DataRow In Mese.Rows
   MeseAttuale = row("MeseAttuale").ToString()
   Exit For
Next

fai partire un ciclo, leggi il primo item e esci...

[optime]

per i parametri

metti vicino la query e i comandi, e vedi subito che hai messo i comandi al contrario

[optime]

il comando update non ti dà errore perché non trova (where) la riga da aggiornare, proprio perché hai scritto male la parte paramentri

[Trafiltecno]

ForEach row AsDataRowInMese.Rows
               MeseAttuale= row("MeseAttuale").ToString()
               ExitFor
Next

Questo perche mi serviva leggere il primo record per sapere a che mese e aggiornata a la tabella, se è il mese precedente a
quello attuale puo partire l'aggiornamento con lo spostamento di un mese su l'altro...per quanto riguarda l'istruzione
comando.Parameters.AddWithValue ho scritto con @campotabella, campo aggiornato.. a me sembra giusto cosi, almeno gli esempi che ho trovato sono tutti cosi

[optime]

...per quanto riguarda l'istruzione
comando.Parameters.AddWithValue ho scritto con @campotabella, campo aggiornato.. a me sembra giusto cosi, almeno gli esempi che ho trovato sono tutti cosi

ti ho detto mettili vicini, così si capisce

Dim Query1 As String = "UPDATE Assegnazioni SET .... WHERE ID=@Indice"
Comando.Parameters.AddWithValue("@ID", Indice)

(mi limito a UN parametro, ma sono tutti messi al contrario come questo)

la chiocciola indica il parametro, il segnaposto, non necessariamente un campo

[Trafiltecno]

DimQuery1AsString="UPDATE Assegnazioni SET .... WHERE ID=@Indice"Comando.Parameters.AddWithValue("@ID",Indice)
 

INVERTENDO i cAampi mi da errore...

[optime]

eh certo
hai modificato la query, ma ti ho detto che l'errore è nella Comando.Parameters.AddWithValue