problème de requete (OR et AND)

Version imprimable

Voici le code en question :

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
Public Function affichage(ByVal param As String) As DataTable
 
        Dim dt As New DataTable
        Dim word() As String
        word = param.Split(" ")
 
        If param = "" Then
            sql = "Select * from histoSortiePiece, client "
            sql = sql & "where histoSortiePiece.client = client.idClient"
        Else
            sql = "Select * from histoSortiePiece, client "
            sql = sql & "where histoSortiePiece.client = client.idClient"
            For i As Integer = 0 To word.Length - 1
                sql = sql & " and nomClient like '%" & word(i) & "%'"
                sql = sql & " or designPiece like '%" & word(i) & "%'"
                sql = sql & " or reference like '%" & word(i) & "%'"
            Next
        End If
        oAcces.fillTable(sql).Fill(dt)
        Try
            Return (dt)
        Catch ex As Exception
 
        End Try
        'Return (oAcces.consult(sql))
    End Function
 
la variable "Param" est renseigné par un mot quelconque. Si je tape "MONNET" qui est un nom de client, il m'affiche la ligne correspondante. Mais je tape "rette47" qui est une reference, il me met les lignes en desordre qui concerne ts les clients alors que ce n'est pas le cas. Aidez moi s'il vous plait!

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
 
 
Public Function affichage(ByVal param As String) As DataTable
 
        Dim dt As New DataTable
        Dim word() As String
        word = param.Split(" ")
 
        If param = "" Then
            sql = "Select * from histoSortiePiece, client "
            sql = sql & "where histoSortiePiece.client = client.idClient"
        Else
            sql = "Select * from histoSortiePiece, client "
            sql = sql & "where histoSortiePiece.client = client.idClient"
            For i As Integer = 0 To word.Length - 1
                sql = sql & " and nomClient like '%" & word(i) & "%'"
                sql = sql & " or designPiece like '%" & word(i) & "%'"
                sql = sql & " or reference like '%" & word(i) & "%'"
            Next
        End If
        oAcces.fillTable(sql).Fill(dt)
        Try
            Return (dt)
        Catch ex As Exception
 
        End Try
        'Return (oAcces.consult(sql))
    End Function

la variable "Param" est renseigné par un mot quelconque. Si je tape "MONNET" qui est un nom de client, il m'affiche la ligne correspondante. Mais je tape "rette47" qui est une reference, il me met les lignes en desordre qui concerne ts les clients alors que ce n'est pas le cas. Aidez moi s'il vous plait!

24/02/2006, 14h01
IG_Snoop

je pense que c'est que des "and" qu'il te faut dans tes conditions
24/02/2006, 14h04
raynor911

oui mais si je mets ça :

je mets le nom du client, il va rien afficher
24/02/2006, 14h07
IG_Snoop

euuh ... exprime ta requête en français alors ... pour voir si ça colle au code.
ton select tu veux qui renvoie koi ?
24/02/2006, 14h11
raynor911

ok

je m'explique :

cette requete permet une selection dans deux tables liées, dependant d'un paramètre quelconque. Qd je tape un mot comme "MERR" par ex, il va rechercher sur chaque champs. S'il trouve, il affiche les lignes où cette partie de mot y est. Tu comprends?

peut être ...je sais pas attend on va voir si tu fait ça sa te va ? :

Code:

1
2
3
4
5
6
sql = "Select * from histoSortiePiece, client "
            sql = sql & "where histoSortiePiece.client = client.idClient"
            For i As Integer = 0 To word.Length - 1
                sql = sql & " and ( nomClient like '%" & word(i) & "%'"
                sql = sql & " or designPiece like '%" & word(i) & "%'"
                sql = sql & " or reference like '%" & word(i) & "%' )"

24/02/2006, 14h28
raynor911

T'es vraiment un dieu toi! Qd j'ai un pb, c'est toujours toi qui me debloque! Merci du font du coeur! ça marche comme sur les roulettes! Merci!