Discussion :

[ICyam]

Bonjour,

Voila le contexte :
Je liste les dossiers dans une ListView, lorsque je sélectionne une ligne de cette dernière chaque éléments se met en place dans des TextBox que je peux modifier. Lorsque les modifications sont faites, je veux mettre a jour l'enregistrement dans la base de donnée. et c'est la que j'ai une erreur d'exception que je ne comprend pas.

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
  'Base de Donnée
        Dim MaConnexion As New OleDbConnection(MaBDD)
        'test d'ouverture
        If MaConnexion.State = ConnectionState.Closed Then MaConnexion.Open() 'Ouverture
 
        'Elements sélectionner dans la liste
        Dim dossier As ListViewItem = LV_Dossiers.SelectedItems(0)
        Dim id As String = dossier.SubItems(0).Text
 
        'Commande SQL pour récupérer tous les utilisateurs/Dossier de la base de données et transfert des résultats dans Users
        Dim CommandSQL As New OleDbCommand("UPDATE Dossiers SET NomUser=@nom, PrenomUser=@prenom, NomDossier=@nomD, DesDossier=@desD, MPDUser=@mdpD WHERE IDUser=@id", MaConnexion)
        CommandSQL.Parameters.AddWithValue("@nom", TB_Nom.Text)
        CommandSQL.Parameters.AddWithValue("@prenom", TB_Prenom.Text)
        CommandSQL.Parameters.AddWithValue("@nomD", TB_NomDossier.Text)
        CommandSQL.Parameters.AddWithValue("@desD", TB_DescriptionDossier.Text)
        CommandSQL.Parameters.AddWithValue("@mdpD", LB_mdpC.Text)
        CommandSQL.Parameters.AddWithValue("@id", id)
 
        CommandSQL.ExecuteNonQuery() 'Excustion de la commande SQL
        CommandSQL.Parameters.Clear() 'Nétoyage des parametres
        MaConnexion.Close()
 
        'Réiniatilisation et mise à jour de la liste des dossiers
        majListView()

Base de données Access :


Erreur d'exception :


Merci par avance pour votre aide.

[r.morel]

Salut,
Un de tes paramètres doit avoir une valeur nul ?
@+

[ICyam]

Justement, aucun de mes paramètres n'est vide. Y compris le Mot de passe que j'ai mis à "0" lorsqu'il n'y en a pas.

J'ai même remplacer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
CommandSQL.Parameters.AddWithValue("@nom", TB_Nom.Text)
        CommandSQL.Parameters.AddWithValue("@prenom", TB_Prenom.Text)
        CommandSQL.Parameters.AddWithValue("@nomD", TB_NomDossier.Text)
        CommandSQL.Parameters.AddWithValue("@desD", TB_DescriptionDossier.Text)
        CommandSQL.Parameters.AddWithValue("@mdpD", LB_mdpC.Text)
        CommandSQL.Parameters.AddWithValue("@id", id)

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
CommandSQL.Parameters.AddWithValue("@nom", "1")
        CommandSQL.Parameters.AddWithValue("@prenom", "2")
        CommandSQL.Parameters.AddWithValue("@nomD", "3")
        CommandSQL.Parameters.AddWithValue("@desD", "4")
        CommandSQL.Parameters.AddWithValue("@mdpD", "5")
        CommandSQL.Parameters.AddWithValue("@id", "12")

Histoire de tester les paramètres.



Je sèche...

[Pol63]

peut etre que c'est le fait que id soit un string en c# et un nombre dans access

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CommandSQL.Parameters.AddWithValue("@id", 12)

ca marche avec ca ?

[ICyam]

Toujours pareil.... Mais je crois que j'avais déjà essayé avant de poster sur le fofo...

On dirais qu'il y a une erreur dans ma requête, mais je ne vois pas où et je me crève les yeux et je m'énerve en plus...

cdt,

[Pol63]

en même temps access n'a jamais été un bon outil, les messages d'erreur y sont toujours le moins explicite possible
et c'est plus un jouet pour débutant qu'une vraie base de données, aucun pro ne travaille avec ça s'il peut faire autrement

peut etre le addwithvalue (qui doit être marqué [obsolete] d'ailleurs), essaye avec un .add qui spécifie le type de la colonne