Facendo l'update di una tabella ottengo l'errore:
Nessun valore specificato per alcuni parametri necessari
la procedura è:
Ho verificato col debug che id_utente è un id validocodice:Private Sub aggiornaDatiAccesso(ByVal comando As OleDbCommand) 'l'utente connesso non può modificarsi il privilegio 7, in servizio, abilitato Dim sql$ = "" Dim abilitato As Boolean Try If CInt(Me.id_utente) = j.id_utente Then abilitato = True Else abilitato = Me.c_abilitato.Checked End If sql = "UPDATE UTENTI_REGIONE SET [NOME_COMPLETO] = ?, [SIGLA] = ?, [TELEFONO] = ?, [TITOLO_STUDIO] = ?, [NOTE] = ?, [ABILITATO] = ? WHERE [ID_UTENTE] = ? " comando.CommandText = sql comando.Parameters.Clear() comando.Parameters.Add("nome_completo", OleDbType.VarChar, 50).Value = Libreria.StringNullToDBNull(Me.c_nome_completo.Text) comando.Parameters.Add("sigla", OleDbType.VarChar, 5).Value = Libreria.StringNullToDBNull(Me.c_sigla.Text) comando.Parameters.Add("telefono", OleDbType.VarChar, 60).Value = Libreria.StringNullToDBNull(Me.c_telefono.Text) comando.Parameters.Add("titolo_studio", OleDbType.VarChar, 40).Value = Libreria.StringNullToDBNull(Me.c_titolo_studi.Text) comando.Parameters.Add("note", OleDbType.VarChar, 200).Value = Libreria.StringNullToDBNull(Me.c_note.Text) comando.Parameters.Add("abilitato", OleDbType.Boolean).Value = abilitato comando.Parameters.Add("id_utente", OleDbType.Integer).Value = Me.id_utente comando.ExecuteNonQuery() Catch ex As Exception Throw End Try End Sub
Non riesco a capireMi date una mano?
![]()
![]()

Mi date una mano?
Rispondi quotando