Discussion :

[pfalinux2007]

L'exécution me retourne : "Procédure 'nom de procédure'; attend le paramètre 'nom de paramètre' qui n'a pas été fourni"

J'ai cherché mais on me dit :
Vérifiez que la propriété Name est sur un objet Command avant de tenter de le référencer via l'objet Connection définie.


La question est ou dois-je vérifier ca??

SVP et merci

[gregb34]

Voila un exemple, ca devrait t'aider...

Devis_MAJ_Ids est ma procédure stockée.
Param1 est mon paramètre en entrée.

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
            Dim Commande As SqlClient.SqlCommand = New SqlClient.SqlCommand
            Dim Param1, Param2, Param3 As SqlClient.SqlParameter
 
            Commande.Connection = Me.SQL_Conn
            Commande.CommandType = CommandType.StoredProcedure
            Commande.CommandText = "Devis_MAJ_IDs"
 
            Param1 = New SqlClient.SqlParameter
            With Param1
                .Direction = ParameterDirection.Input
                .ParameterName = "@to_societe_id"
                .Size = 4
                .Value = Mon_Devis.to_societe_id
            End With
 
            Commande.Parameters.Add(Param1)
            Commande.ExecuteNonQuery()

[SaumonAgile]

La procédure que tu veux appeler prends une valeur en paramètre, et tu ne lui fournis pas. C'est pour ça que ça plante.

[pfalinux2007]

Merci pour vos réponses ;
pour le code j'ai pratiquement la même chose mais ca ne marche pas c juste pour cette procédure car le même code marchait bien auparavant.
voilà mon code :

conscarb_etat3 est ma procédure et j'ai 5 paramétres en entrées : @mode,@choix,@entite,@datedeb,@datefin

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
Dim cmd As New SqlCommand
                Dim dsEdParc As dsEtatCONSCARB = New dsEtatCONSCARB
                Dim cn = New SqlConnection(Application("Strcnxpaut"))
                cn.Open()
                cmd = New SqlCommand("conscarb_etat3", cn)
                cmd.CommandType = CommandType.StoredProcedure
                cmd.CommandText = "conscarb_etat3"
                Dim prmmode = New SqlParameter
                With prmmode
                    .Direction = ParameterDirection.Input
                    .ParameterName = "@mode"
                    .Size = 1
                    .Value = DDL1.SelectedValue
                End With
                cmd.Parameters.Add(prmmode)
                cmd.ExecuteNonQuery()
                Dim prmchoix = New SqlParameter("@choix", SqlDbType.Char, 1)
                prmchoix.Direction = ParameterDirection.Input
                prmchoix.Value = DDL2.SelectedValue
                cmd.Parameters.Add(prmchoix)
                cmd.ExecuteNonQuery()
                Dim prmentite = New SqlParameter("@entite", SqlDbType.VarChar, 10)
                prmentite.Value = DDL3.SelectedValue
                cmd.Parameters.Add(prmentite)
                cmd.ExecuteNonQuery()
                Dim prmdatdebut = New SqlParameter("@datedeb", SqlDbType.DateTime, 8)
                prmdatdebut.Value = dd.Text
                cmd.Parameters.Add(prmdatdebut)
                cmd.ExecuteNonQuery()
                Dim prmdatfin = New SqlParameter("@datefin", SqlDbType.DateTime, 8)
                prmdatfin.Value = df.Text
                cmd.Parameters.Add(prmdatfin)
                cmd.ExecuteNonQuery()

[SaumonAgile]

Il faut appeler ExecuteNonQuery une fois tous les paramètres ajoutés et pas après chaque paramètre...

[pfalinux2007]

Merci énormément maintenant je n'ai plus l'erreur principal mais j'ai ca en revanche : Expiration du délai d'attente. Le délai d'attente s'est écoulé avant la fin de l'opération ou le serveur ne répond pas.

[pfalinux2007]

C'est bon le probléme avec les données est réglé pour la derniére erreur j'ai augmenté la CommandTimeout de SQLCOMMAND est c'est tout .

Merci Beaucoup pour votre aide c'est sympa