Discussion :

[Pelote2012]

Bonjour,

Voilà, j'ai une société avec des contacts (personnel de la société en français)

Je souhaite avoir une liste des tous les contacts de la société classer par order alphabétique. J'ai donc fait une fonction (au passage si quelqu'un peut me dire si on peut faire du tri du style MaSoc.Contacts.orderby ...)
Je reviens à ma question de départ

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Public Shared Function GetContacts(ByVal IdSoc As Integer, ByVal LesDatas As kickoff2012Entities, Optional ByVal Status As String = "") As Object
        Try
            Dim Query = (From Cont In LesDatas.Contacts Where Cont.IDSociete = IdSoc Order By Cont.Nom, Cont.Prenom Select Cont)
            If Status <> "" Then Query = Query.Where(Function(a, b) a.StatutInvitation = Status)
            Return Query
        Catch ex As Exception
            Return Nothing
        End Try
    End Function

Voici l'appel de ma fonction

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
 
Private Sub BindListeCollaborateurs()
        Dim soc As Societe = SocieteClass.GetSociete(ConnectedUser.IDSociete, LesDatas)
        Dim lstCont
        If ConnectedUser.EstManager Then
            Page.Title = "Liste des collaborateurs " & soc.Libelle
            lstCont = SocieteClass.GetContacts(soc.IDSociete, LesDatas)
        Else
            Page.Title = "Liste des collègues invités " & soc.Libelle
            lstCont = SocieteClass.GetContacts(soc.IDSociete, LesDatas, "A")
        End If
 
        rpt1.DataSource = lstCont
        rpt1.DataBind()
 
    End Sub

Si je suis manager, ça marche
Mais si je ne le suis pas je souhaite n'afficher qu'un certain profil de contact
et là mon filtre se plante sur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rpt1.DataBind()

msg error :

LINQ to Entities ne reconnaît pas la méthode « System.Linq.IQueryable`1[KickOff.Contact] Where[Contact](System.Linq.IQueryable`1[KickOff.Contact], System.Linq.Expressions.Expression`1[System.Func`3[KickOff.Contact,System.Int32,System.Boolean]]) », et cette dernière ne peut pas être traduite en expression de magasin.

Je dois avouer être un gros débutant sur ces clauses where et je ne les compends pas très bien. Si quelqu'un pouvait m'aider en m'expliquant un peu le fonctionnement ...

Merci d'avance

[Invité]

C'est une erreur typique avec Linq To Entities.

Une requête Linq To Entities est traduite en SQL lors de son execution. Par conséquent, elle ne doit pas comporter d'éléments qui n'ont pas leur équivalent SQL. Tu peux pas appeler des fonctions, etc ... qui ne sont pas interprétables en SQL.

Dans ton cas, tu vois bien que tout fonctionne lorsque tu es "Manager" mais que ça plante lorsque tu ne l'es pas. En regardant ton code, on constate que dans le cas ou ça plante, tu executes cette portion de code en plus :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Status <> "" Then Query = Query.Where(Function(a, b) a.StatutInvitation = Status)

C'est donc là que se situe l'erreur.

La première solution consiste donc à remplacer l'élément qui provoque l'erreur en utilisant une méthode "compatible" SQL.

Si ce n'est pas possible, il faut procéder en deux étapes.
Tu fais une première requête Linq to Entities avec la partie qui fonctionne. Tu fais ensuite une projection (via un .ToList() ou autre).
Le fait de faire un ToList() va executer la requête.
Tu peux ensuite faire ton filtre sur le Statut et ça fonctionnera car tu ne fais plus du Linq To Entities. Tu as déjà rappatrié les données.

Par contre, c'est pas top dans ton cas car tu vas récupérer des données inutiles et ensuite les filtrer. Dans l'idéal, il faut ramener de la BDD seulement les données qui sont vraiment utiles.

J'espère que j'ai été clair.

[tomlev]

Pourquoi utilises-tu la surcharge de Where qui prend un prédicat à 2 paramètres ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Query.Where(Function(a, b) a.StatutInvitation = Status)

Le deuxième paramètre du prédicat (b) correspond à la position de l'élémént, mais :
- tu ne l'utilises pas
- ce n'est pas traduisible en SQL (à ma connaissance en tous cas)

Il suffit donc que tu utilises la surcharge qui prend un prédicat avec un seul paramètre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Query.Where(Function(a) a.StatutInvitation = Status)

[Pelote2012]

Vendredi, quand j'ai essayé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Query.Where(Function(a) a.StatutInvitation = "A")

J'avais un message d'erreur, à la compile qui me parlai de mettre un 2nd argument (j'ai fais sans poser de question pour voir ce qui se passerai)
Le message d'erreur disparu ...
Je reessaye ce matin comme tu le suggères ... et ça marche

2 solutions :
- soit que j'ai modifié mon code sans faire attention et j'ai oublié depuis le weekend
- soit mon visual studio a fumé un plomb à l'arrivée de Weekend

Par contre, peux-tu m'en dire plus sur :

Le deuxième paramètre du prédicat (b) correspond à la position de l'élémént

ça sert à quoi?

[tomlev]

Par contre, peux-tu m'en dire plus sur :

ça sert à quoi?

Quand tu veux faire un filtre qui prend en compte la position de l'élément dans la séquence... Par exemple ce filtre prend un élément sur trois :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Query.Where(Function(item, index) index Mod 3 = 0)

en pratique ça sert assez rarement...

[Pelote2012]

ok merci