Discussion :

[actiproj]

Bonjour

Dans un programme, j'ai le code suivant

Code :

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

Dim listeModeles = OwnSqlContext.ExtracteurModeleDroits.Where(Function(x) (x.IdSalarie IsNot Nothing And x.IdSalarie = idSalarie) Or (x.IdInterim IsNot Nothing And x.IdInterim = idSalarie)).Select(Function(x) x.ExtracteurModele).ToList

Cela me permet de récupérer la liste de ExtracteurModele si l'utilisateur en a le droit, qu'il soit salarié ou interimaire

Ce code renvoie une erreur
Unable to cast the type 'System.Boolean' to type 'System.Object'. Linq to Entities only supports casting EDM primitive or enumeration types

Code :

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

1
2
3
4
5
6
7
8
9
Public Class ExtracteurModeleDroit
 
    Public Property Id As Int64
    Public Property IdExtracteurModele As Int64
    Public Property IdInterim As Int64? = Nothing
    Public Property IdSalarie As Int64? = Nothing
 
    Public Overridable Property ExtracteurModele As ExtracteurModele
End Class

Si je complète en mettant un ToList, ce code fonctionne normalement

Code :

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

Dim listeModeles = OwnSqlContext.ExtracteurModeleDroits.ToList.Where(Function(x) (x.IdSalarie IsNot Nothing And x.IdSalarie = idSalarie) Or (x.IdInterim IsNot Nothing And x.IdInterim = idSalarie)).Select(Function(x) x.ExtracteurModele).ToList

Pourriez vous m'expliquer pourquoi ?

Cordialement
Actiproj

[DD-78]

Bonjour,

Cela fait un moment que je ne programme plus en vb mais il me semble que si le typage de la variable n"est pas défini elle est considérée comme object.

[actiproj]

Bonjour

J'ai fini par comprendre, il suffisait de mettre AndAlso à la place de And