Aide pour améliorer le code d'une requête MySQL "paramétrée"

Version imprimable

09/12/2020, 12h42
ted the Ors

Aide pour améliorer le code d'une requête MySQL "paramétrée"

Bonjour,

Je développe une application avec un formulaire permettant d'afficher dans un datagrid les entrées d'une table MySql. Ce formulaire propose plusieurs champs saisissable, correspondant aux colonnes de ma table, qui jouent ainsi le rôle de filtre.
Par exemple, j'ai une table Clients qui contient les colonnes "Nom", "Ville", "Age". J'ai donc un formulaire avec trois textbox: Nom, Ville et Age.
Lors du load du form, j'affiche l'intégralité de ma table. Jusque là, tout va bien. Je fais SELECT Nom,Ville,Age from T_CLIENTS, un datatable pour po et zou.

En revanche, comment procéder pour coder "proprement" le filtre. En effet, je voudrais utiliser les paramètres (MySqlParameter) mais je suis face à deux problèmes:
- un paramètre peut être valorisé ou non : du coup, impossible pour moi de définir en amont la requête SELECT Nom, Ville Age From T_CLIENTS WHERE Nom=@Nom OR Ville =@Ville OR Age=@Age étant donné que si le champ est vide, la requête ne renverra pas le résultat escompté.
- un paramètre peut contenir plusieurs valeurs. Par exemple, le champ "Nom" peut contenir la valeur "Dupont;Durand", la requête correspondante serait Select Nom,Ville,Age From T_CLIENTS Where Nom In ("Dupont","Durand) mais si le champ contient la valeur "Dupont", la requête serait Select Nom,Ville,Age From T_CLIENTS Where Nom = "Dupont" (je me rends compte à l'écriture de ce message que je pourrais faire un IN ("DUPONT"))

Je peux (et sais comment) m'en sortir mais avec beaucoup de code et en construisant la requête au fur à mesure de la lecture des champs mais je fais appel à vous pour savoir s'il existe une façon plus "propre" de coder cela.

D'avance merci.

Tu peux faire des if ou select case comme ceci :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
if Nom <> "" then
   if ville <> "" then
     if age <> "" then
         requette1 (avec 03 param)
     else
         requette2 (avec nom et ville)
     endif
   else
        requette3 (nom et age)
   endif
else
msgbox ("saisie le nom")
endif

bonjour,
il y a du code à completer mais l’idée est là!

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
30
31
32
33
34
35
36
37
38
39
40
41
Dim Sql As String = "SELECT Nom, Ville Age From T_CLIENTS "
        Dim P(3) As OleDbParameter = Nothing
        Dim Nom() As String = {"toto"}, Ville As String = "Paris", Age As Integer = 26
        Dim StrWhere As String = ""
 
 
        If Nom.Count = 1 Then
            P(0) = New OleDbParameter
            StrWhere = "WHERE Nom=@Nom"
            P(0).OleDbType = OleDbType.Char
            P(0).ParameterName = "@Nom"
            P(0).Size =50
            P(0).Value = Nom(0)
        Else
            StrWhere = "WHERE Nom In("
            For n As Integer = 0 To Nom.Count - 1
                If n > 0 Then StrWhere += ","
                StrWhere += " '" + Nom(n) + "'"
            Next
            StrWhere += ")"
        End If
        If Ville.Trim <> "" Then
            P(1) = New OleDbParameter
            If StrWhere.Trim = "" Then
                StrWhere = "WHERE Ville=@Ville"
            Else
                StrWhere += " OR Ville=@Ville"
            End If
        End If
        If Age.ToString.Trim <> "" Then
            P(2) = New OleDbParameter
            If StrWhere.Trim = "" Then
                StrWhere = "WHERE Age=@Age"
            Else
                StrWhere += " OR Age=@Age"
            End If
        End If
        Dim Cm As New OleDbCommand
        For Each Prm As OleDbParameter In P
            If Prm IsNot Nothing Then Cm.Parameters.Add(Prm)
        Next

11/12/2020, 10h04
ted the Ors

Merci à vous deux. J'ai opté pour la première proposition mais je vais voir comment adapter la deuxième qui est programmatiquement plus élégante.

Très bonne journée et bon week-end.