Procedure Stockée en code behind
Bonjour,
Ce code ne fonctionne pas (et je ne comprends pas vraiment pourquoi), aucune erreur, juste il ne se passe rien (SQL Profiler ne voit rien passé)
Code:
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
|
' ****** Déclaration des variables de connexion
Dim DBConn As New SqlConnection
Dim cmd As New SqlCommand()
' ****** initialisation de la chaine de connexion dans le cas d une authentification sql server
DBConn.ConnectionString = System.Configuration.ConfigurationManager.ConnectionStrings("ConnectionString1").ToString
' ****** ouverture de la connexion
DBConn.Open()
' ****** Initialisation de la commande
cmd.Connection = DBConn
cmd.CommandText = "dbo.[p_APPSRV_PWD_insert]"
cmd.CommandType = System.Data.CommandType.StoredProcedure
cmd.Parameters.Add("@nom", Data.SqlDbType.NVarChar).Value = TextBox_Serveur.Text
cmd.Parameters.Add("@detail", Data.SqlDbType.Int).Value = TextBox_Detail.Text
cmd.Parameters.Add("@observation", Data.SqlDbType.Int).Value = TextBox_Observation.Text
cmd.Parameters.Add("@createlogin", Data.SqlDbType.NVarChar).Value = (Mid(LCase(User.Identity.Name), (InStr(LCase(User.Identity.Name), "\")) + 1))
cmd.Parameters.Add("@login", Data.SqlDbType.NVarChar).Value = TextBox_login.Text
cmd.Parameters.Add("@mdp", Data.SqlDbType.NVarChar).Value = TextBox_mdp.Text
cmd.Parameters.Add("@observation_pwd", Data.SqlDbType.NVarChar).Value = Textbox_observation_mdp.Text
cmd.Parameters.Add("@auteur_maj", Data.SqlDbType.NVarChar).Value = (Mid(LCase(User.Identity.Name), (InStr(LCase(User.Identity.Name), "\")) + 1))
cmd.Parameters.Add("@id_referent", Data.SqlDbType.Int).Value = DropDownList4.Text
cmd.Parameters.Add("@id_type", Data.SqlDbType.Int).Value = id_type
cmd.ExecuteNonQuery() |
La procédure stockée, elle fonctionne correctement.
Merci de m'aider.
