Discussion :

[Pelote2012]

Bonjour

J'ai un schéma edmx avec Deux tables: MiseADispo et Fichier
Avec le lien : 1 MiseADispo peut avoir plusieurs fichiers et un fichier ne peut avoir qu'une MiseADispo

En base tout ce rempli correctement.

par contre quand je fait MiseADispo.Fichier, il ne me retourne rien dans la collection, or en base les champs sont correctement remplis.

Je suis en .net 4.0 et j'utilise le générateur de code POCO

Quelqu'un aurait une idée d'où ça pourrait venir?

[tortuegenie]

Est ce que tes tables ont une primary key ?

[rad_hass]

Comment fais tu pour récupérer MiseADispo ? Récupères-tu ses dépendances avec Fichier ?

Si tu ne le récupère pas il est peut être normal qu'il soit null

[Immobilis]

Salut,

Un peu de code serait bienvenu. Il y a ce post aussi: http://blog.developpez.com/bdevuyst/...et-les-constr/. Une piste?

A+

[Pelote2012]

Mes tables ont toutes une clé primaire sur un champs ID de forme guid

Sinon je récupére mes infos directement sur la BDD:

Code :

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

 obj = HelperMiseADispo.MaDById(IDMaD)

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
 
Imports Microsoft.VisualBasic
Imports GlobalVar
 
Public Class HelperMiseADispo
 
    Public Shared Function MaDById(ByVal Id As Guid) As MiseADispositionJeu
        Try
            Return (From mad In LesDatas.MiseADispositionJeu Where mad.ID = Id Select mad).Single
        Catch ex As Exception
            Return Nothing
        End Try
    End Function
 
End Class

GlobalVar.vb

Code :

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

1
2
3
4
5
6
7
 
Imports Microsoft.VisualBasic
 
Public Class GlobalVar
    Public Shared LesDatas As New FileTransfertEntities 
' FileTransfertEntities  = Nom du conteneur d'entité
End Class

obj est bien de la forme MiseADispo car tous les champs que j'affiche sont bons
Le seul problème est apparement la liaison avec la table Fichier

Mon appel

Code :

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

1
2
3
 
rptFichier.DataSource = obj.FichierJeu
rptFichier.DataBind()

passe par le get d'une fonction générée par POCO mais _fichier Isnot Nothing mais est vide collection.count=0 quand je fait "espion express"

Le générateur POCO:

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
17
18
19
20
21
22
23
24
 
 Public Overridable Property FichierJeu As ICollection(Of FichierJeu)
        Get
            If _fichierJeu Is Nothing Then
                Dim newCollection As New FixupCollection(Of FichierJeu)
                AddHandler newCollection.CollectionChanged, AddressOf FixupFichierJeu
                _fichierJeu = newCollection
            End If
            Return _fichierJeu
        End Get
        Set(ByVal value As ICollection(Of FichierJeu))
            If _fichierJeu IsNot value Then
                Dim previousValue As FixupCollection(Of FichierJeu) = TryCast(_fichierJeu, FixupCollection(Of FichierJeu))
                If previousValue IsNot Nothing Then
                    RemoveHandler previousValue.CollectionChanged, AddressOf FixupFichierJeu
                End If
                _fichierJeu = value
                Dim newValue As FixupCollection(Of FichierJeu) = TryCast(value, FixupCollection(Of FichierJeu))
                If newValue IsNot Nothing Then
                    AddHandler newValue.CollectionChanged, AddressOf FixupFichierJeu
                End If
            End If
        End Set
    End Property

Rad Hass comment fait-on pour Récupèrer les dépendances avec Fichier ?

[rad_hass]

Soit en récupérant les Fichier attendu dans le même context et du coup les objets seront automatiquement lié à MiseADispo. Soit en utilisant la fonction Include voir ici : msdn

[Pelote2012]

Code :

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

1
2
3
4
5
6
7
8
 
Public Shared Function MaDById(ByVal Id As Guid) As MiseADispositionJeu
        Try
            Return (From mad In LesDatas.MiseADispositionJeu.Include("FichierJeu.DestinataireJeu") Where mad.ID = Id Select mad).Single
        Catch ex As Exception
            Return Nothing
        End Try
    End Function

J'ai corrigé comme cela car j'ai besoin de rebondir sur une 3eme tablz=e encore, et ça marche du tonnerre, grand merci