Limite requete parametrée

Version imprimable

Bonjour à tous.

je fait face à un problème qui me dépasse ... Avec le code suivant :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
  MyDate = dteMonth & "/" & dteDay & "/" & dteYear
 
        Dim sqlConn As SqlConnection = New SqlConnection(strConnection)
        Dim SQLStmt As String = "SELECT tblAccessoriesBook.IdAccessoriesBook " & _
                                "FROM tblAccessoriesBook INNER JOIN " & _
                                "tblAccessories ON tblAccessoriesBook.IdAccessories = tblAccessories.IdAccessories INNER JOIN " & _
                                "tblGroups ON tblAccessories.IdGroups = tblGroups.IdGroups " & _
                                "WHERE (tblGroups.AutoMailHour = '" & DateTime.Now.Hour & ":00" & "') AND IsReturn = '0' AND IsAttribution = '0' AND ReturnDate < '" & MyDate & "' AND tblGroups.IdCountry = '1' AND " & DateTime.Now.DayOfWeek.ToString & " = 'True' "
        Dim cmdGetRequestor As SqlCommand
        Dim dtrSubject As SqlDataReader
        Dim email As String = ""
        sqlConn.Open()
        cmdGetRequestor = New SqlCommand(SQLStmt, sqlConn)
        dtrSubject = cmdGetRequestor.ExecuteReader
        While dtrSubject.Read()            SendNotReturnMailAccessories(dtrSubject("IdAccessoriesBook").ToString)
        End While
        dtrSubject.Close()
 
        sqlConn.Close()

Ma fonction SendNotReturnMailAccessories est bien appelée (la requete SQL me retourne 6 ligne)

Mais avec le code suivant, et des requetes paramétrées

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
        MyDate = dteMonth & "/" & dteDay & "/" & dteYear
 
        Dim sqlConn As SqlConnection = New SqlConnection(strConnection)
        Dim SQLStmt As String = "SELECT tblAccessoriesBook.IdAccessoriesBook " & _
                                "FROM tblAccessoriesBook INNER JOIN " & _
                                "tblAccessories ON tblAccessoriesBook.IdAccessories = tblAccessories.IdAccessories INNER JOIN " & _
                                "tblGroups ON tblAccessories.IdGroups = tblGroups.IdGroups " & _
                                "WHERE (tblGroups.AutoMailHour = @Hour) AND IsReturn = '0' AND IsAttribution = '0' AND ReturnDate < @ReturnDate AND tblGroups.IdCountry = '1' AND @CurrentDay = 'True' "
        Dim cmdGetRequestor As SqlCommand
        Dim dtrSubject As SqlDataReader
        Dim email As String = ""
        sqlConn.Open()
        cmdGetRequestor = New SqlCommand(SQLStmt, sqlConn)
        cmdGetRequestor.Parameters.AddWithValue("@Hour", DateTime.Now.Hour & ":00")
        cmdGetRequestor.Parameters.AddWithValue("@ReturnDate", MyDate)
        cmdGetRequestor.Parameters.AddWithValue("@CurrentDay", DateTime.Now.DayOfWeek.ToString)
        dtrSubject = cmdGetRequestor.ExecuteReader
        While dtrSubject.Read()
            SendNotReturnMailAccessories(dtrSubject("IdAccessoriesBook").ToString)
        End While
        dtrSubject.Close()
 
        sqlConn.Close()

Ma requete SQL ne retourne rien. Je ne vois pas mon erreur ...

Quelqu'un a-t-il une idée ?

Cordialement.

DeWaRs

14/10/2013, 14h00
callo

A première vue, le problème devrait se trouver au niveau de @CurrentDay dans ton instruction. Dans

Citation:

tblGroups.IdCountry = '1' AND @CurrentDay = 'True'

, le paramètre devrait être au niveau de la valeur du champ. Alors que tu as paramétré plutôt le champ. A mon avis, tu devrais avoir CurrentDay = 'True' et non @CurrentDay = 'True'.
Enfin, je ne sais pas si ma remarque est correcte. Peut-être que d'autres esprits plus avisés y verront plus clair :)
14/10/2013, 14h02
Sankasssss

Ca :

Code:

"... AND " & DateTime.Now.DayOfWeek.ToString & " = 'True' "

et ça :

Code:

"... AND @CurrentDay = 'True' "

est très différent.

Dans le premier exemple, une fois exécuté, c'est cette commande qui est envoyée :

Code:

"... AND vendredi = 'True' "

alors que dans la seconde se sera :

Code:

"... AND 'vendredi' = 'True' "

ce qui vaura tout les temps FALSE et qui renverra donc toujours 0 ligne.

Il ne faut pas utiliser de paramètre pour un nom de colonne mais uniquement pour son contenu.

EDIT : c'est presque ça callo :P
14/10/2013, 14h13
DeWaRs

Merci de vos réponses.
Concernant cette remarque :

Citation:

Envoyé par Sankasssss

Il ne faut pas utiliser de paramètre pour un nom de colonne mais uniquement pour son contenu.

EDIT : c'est presque ça callo :P

Il n'y a donc pas de solution pour passer "proprement" un nom de colonne en paramètre ? Est-ce parce que ce n'est simplement pas gérer par le framework ou alors parce que cela ne ce fait habituellement pas, programmaticalement parlant ?

Cordialement.

DeWaRs
14/10/2013, 14h19
callo
Citation:

Envoyé par DeWaRs

Il n'y a donc pas de solution pour passer "proprement" un nom de colonne en paramètre ? Est-ce parce que ce n'est simplement pas gérer par le framework ou alors parce que cela ne ce fait habituellement pas, programmaticalement parlant ?

A mon avis, tu peux contourner, mais en terme de bonnes pratiques, je ne sais pas si c'est safe. Un truc du genre:
Code:

1 2 3 4 5 SELECT CASE @TonParam WHEN 4 THEN Vendredi WHEN 5 THEN Samedi WHEN 6 THEN Dimanche END

Pour moi et dans ce cas, rien n'interdit de passer par de la concaténation :
Code:

1 2 3 4 5 6 7 8 Dim nameColDay As String() = {"Dimanche", "Lundi", "Mardi", "Mercredi", "Jeudi", "Vendredi", "Samedi"} Dim SQLStmt As String = "SELECT tblAccessoriesBook.IdAccessoriesBook " & _ "FROM tblAccessoriesBook INNER JOIN " & _ "tblAccessories ON tblAccessoriesBook.IdAccessories = tblAccessories.IdAccessories INNER JOIN " & _ "tblGroups ON tblAccessories.IdGroups = tblGroups.IdGroups " & _ "WHERE (tblGroups.AutoMailHour = @Hour) AND IsReturn = '0' AND IsAttribution = '0' " & _ " AND ReturnDate < @ReturnDate AND tblGroups.IdCountry = '1' AND " & nameColDay(Now.DayOfWeek) & " = 'True' "
Pourquoi? Le type reçu est un type Date et on ne pourra jamais faire de l'injection avec (d'autant plus qu'il provient du système). Cela ne nuit pas non plus au performance donc pas de soucis.

Remarque aussi que je passe par un tableau pour les colonnes car si la culture du PC sur lequel tourne l'application n'est pas la même que toi, ton application ne fonctionnera plus car Now.DayOfWeek.ToString sera dans la langue du PC, par exemple Monday.

14/10/2013, 15h46
DeWaRs

Ok, merci pour vos retours, tout est clair a présent. L'application est destiner à tourner sur une seule machine (il s'agit d'une routine d'envoie de mail), donc pas de risque au niveau de la confusion des jours.

Merci encore

DeWaRs