passer un array en parametre

Question

Bonjour, 
 
 mon problème est que je dois passer un array (ensemble de valeurs de type string récupérés depuis un datagridview) en paramètre dans un requête sql (numéro pièce in array), mais ça ne marche pas du coté de la requête.voici le code que j'utilise :

***récupération des valeurs depuis un datagridview

        Dim array As New ArrayList
        For x As Integer = 0 To DataGridView2.Rows.Count - 1
            arrayt.Add(DataGridView2.Rows(x).Cells(1).Value)
        Next
        ' convert Arraylist to a string array.
        Dim strStrings() As String = array.ToArray(GetType(String))
        Dim strJoinedString As String
        ' join the strings
        strJoinedString = Join(strStrings, ",") 

***requête sql :

Dim cmd As New SqlCommand("SELECT F_DOCLIGNE.AR_Ref,SUM(DL_Qte),Emplacement,F_DOCLIGNE.DL_Design,F_DOCLIGNE.CT_Num FROM F_DOCLIGNE LEFT JOIN F_ARTICLE on F_ARTICLE.cbAR_Ref=F_DOCLIGNE.cbAR_Ref where DO_Piece IN '" & ("'" & strJoinedString & "'") & "' AND DL_Design <> 'BON URGENT' AND (F_Docligne.DO_Type='12') GROUP BY F_Docligne.Ar_Ref,emplacement,F_DOCLIGNE.DL_Design,F_DOCLIGNE.CT_Num", cnx)
                
                cmd.Parameters.Add("@NumPiece", SqlDbType.varchar)
                cmd.Parameters("@NumPiece").Value = strJoinedString 
                reader = cmd.ExecuteReader()
                timeout = cmd.CommandTimeout

merci pour votre aide
--

Whismeril · Answer

Bonsoir, je suis mauvais en VB et encore plus en SQL.

Mais ta question est  mon problème est que je dois passer un array ... en paramètre dans un requête sql 

et ton code fait:
        Dim strJoinedString As String
        ' join the strings
        strJoinedString = Join(strStrings, ",")
donc au final c'est un string que tu passes en paramètre.

J'en perds mon latin...

joujma5 · Answer

je parcours mon array et je stocke ces éléments dans une variable de type string (conversion d'un array à string) : Dim strStrings() As String = array.ToArray(GetType(String)) et c'est ainsi que le paramètre passé est un string
 
--

Whismeril · Answer

OK là on est d'accord.
Donc ta vraie question c'est quoi?

joujma5 · Answer

la requête m'affiche un message d'erreur du coté du paramètre en faite ce paramètre doit avoir comme forme ('XXXX','YYYY','ZZZ') mais lorsque je fais des concaténations avant de passer ce dernier un bug s'affiche du coté de la requête sql 
 
--

cs_ShayW · Answer

Bonjour
Où utilise tu @NumPiece dans ta requete ?
Utilise plutot un list of string  qu'un arraylist

joujma5 · Answer

bonjour 
peu tu m'expliquer d'avantage , en faite j'ai utilisé @numpiece en premier lieu dans la clause where (DO_Piece IN '" & ("'" & strJoinedString & "'") & "') pour remplacer   strJoinedString.
 
--

cs_ShayW · Answer

le @NumPiece est le parametre 

tu peux obtenir ton strJoinedString ainsi
Private Function GetJoinStr() As String        Dim joinstr As String = String.Empty        For i = 0 To DataGridView1.Rows.Count - 2      'à la place de column1 le nom de ta colonne            joinstr &= DataGridView1.Rows(i).Cells("column1").Value & ","        Next        'on supprime la derniere virgule        joinstr = joinstr.Substring(0, joinstr.Length - 1)        Return joinstr    End Function

n'écris pas ta requete de 10 metres sur une seule ligne

Dim query As String        query = "SELECT F_DOCLIGNE.AR_Ref,SUM(DL_Qte),Emplacement,F_DOCLIGNE.DL_Design,F_DOCLIGNE.CT_Num _ FROM F_DOCLIGNE "        query &= " LEFT JOIN F_ARTICLE on F_ARTICLE.cbAR_Ref=F_DOCLIGNE.cbAR_Ref "        query &= " where DO_Piece IN  (@NumPiece)  AND DL_Design <> 'BON URGENT' "        query &= "AND (F_Docligne.DO_Type='12') GROUP BY F_Docligne.Ar_Ref,emplacement,F_DOCLIGNE.DL_Design,F_DOCLIGNE.CT_Num"               Dim cmd As New SqlCommand(query, cnx)        cmd.Parameters.Add("@NumPiece", SqlDbType.VarChar)        cmd.Parameters("@NumPiece").Value = GetJoinStr()        cmd.ExecuteReader()

est ce cnx est déclaré et initié ?

Passer un array en parametre

7 réponses

Votre réponse

Discussions similaires