Bonjour,
j'ai une procédure qui doit me permettre d'ajouter un salarié :
Voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 CREATE PROCEDURE [dbo].[ajout_personnel] @matricule varchar(255), @nom_personnel varchar(255), @prenom_personnel varchar(255) AS BEGIN SET NOCOUNT ON; -- Requete d'insertion d'un salarié :: INSERT INTO personnel (matricule, nom, prenom) VALUES(@matricule, @nom_personnel, @prenom_personnel) END
Mon erreur se situe dans l'exécution de la requête "commande". Dans le try l'appli me retourne le message d'erreur Erreur d'execution de la requete d'ajout d'un salarié!
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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67 '###################### ' AJOUT D'UN SALARIé :: '###################### 'Déclaration de la connection à la BDD Dim connection As New SqlClient.SqlConnection(VGconnexion) 'Variable parametre d'entrée et de sortie pour la procédure Dim parammatricule As SqlClient.SqlParameter Dim paramnom As SqlClient.SqlParameter Dim paramprenom As SqlClient.SqlParameter 'Variable d'accueil de la chain procedure Dim StrProcedure As String = "ajout_personnel" 'OUVERTURE DE LA CONNECTION A LA BASE Try 'Ouverture de la connexion à la BDD connection.Open() Catch 'Message d'erreur comme quoi la connexion n'a pas été effectuée MessageBox.Show("Erreur d'ouverture de la connexion a la base!") End Try 'Déclaration de la commande Requete AJOUT PERSONNEL Dim commande As New SqlClient.SqlCommand(StrProcedure, connection) 'DECLARATION DES PARAMETRES :: 'Matricule salarié parammatricule = New SqlClient.SqlParameter("@matricule", Me.matricule.Text) parammatricule.Direction = ParameterDirection.Input 'Nom salarié paramnom = New SqlClient.SqlParameter("@nom_personnel", Me.nom.Text) paramnom.Direction = ParameterDirection.Input 'Prenom salarié paramprenom = New SqlClient.SqlParameter("@prenom_personnel", Me.prenom.Text) paramprenom.Direction = ParameterDirection.Input 'AJOUT DES PARAMETRES :: 'Matricule salarié commande.Parameters.Add(parammatricule) 'Nom salarié commande.Parameters.Add(paramnom) 'Prenom salarié commande.Parameters.Add(paramprenom) 'EXECUTION DE LA REQUETE :: Try 'Execution de la requete commande.ExecuteNonQuery() Catch ex As Exception 'Message d'erreur comme quoi l'insertion n'a pas été effectuée MessageBox.Show("Erreur d'execution de la requete d'ajout d'un salarié!") End Try 'FERMETURE DE LA CONNECTION :: Try 'Fermeture de la connexion à la BDD connection.Close() Catch 'Message d'erreur comme quoi la connexion n'a pas été effectuée MessageBox.Show("Erreur de fermeture de la connexion a la base!") End Try
Pouvez vous m'aider SVP.
Merci
.Mat
EDIT ::
Voici le message d'erreur complet ::
Partager