Discussion :

[Paul Van Walleghem]

Bonjour à tous,

La fonction ci-dessous utilise LINQ to SQL pour recupérer un enregistrement d'une table.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Function GetPageCurrent(ByVal nInventaire As Integer, ByVal nPage As Integer) As Array
            ' Envoie la page en cours de lecture
 
   Dim oDtRowResult = (From oPagesDoc In oScanDataContext.TblPagesDoc _
                               Where oPagesDoc.Inventaire = nInventaire And _
                                     oPagesDoc.NumPage = nPage _
                               Select oPagesDoc.Inventaire, oPagesDoc.NumPage,     oPagesDoc.NumSignet, _
                                      oPagesDoc.Fimage, oPagesDoc.Mhaute, oPagesDoc.Mgauche, _
                                      oPagesDoc.Agrandi)
Return oDtRowResult.ToArray
        End Function

La méthode "ToArray" crée un tableau de rang 1 qui contient une seule chaîne de caractères où sont concatennées toutes les valeurs du résultat de la requêtes. Pourquoi cette concaténation?
Quelle technique dois-je pour récupérer chaque valeur du résultat séparément?

Merci de vos lumières!
Avec mes sincères salutations,

[tigunn]

La solution la plus propre serait de créer un objet dans linq:

Code :

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

1
2
3
4
5
6
(From oPagesDoc In oScanDataContext.TblPagesDoc _
                               Where oPagesDoc.Inventaire = nInventaire And _
                                     oPagesDoc.NumPage = nPage _
                               Select new PageDoc(oPagesDoc.Inventaire, oPagesDoc.NumPage,     oPagesDoc.NumSignet, _
                                      oPagesDoc.Fimage, oPagesDoc.Mhaute, oPagesDoc.Mgauche, _
                                      oPagesDoc.Agrandi))

Tu obtiendrais alors un tableau d'objets PageDoc.
Si tu ne souhaites retourner qu'un seul enregistrement de ta base (1 ligne) tu devras utiliser .FirstOrDefault et alors tu pourras faire utiliser le resultat ainsi:

Code :

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

label.text=oDtRowResult.Inventaire

[Paul Van Walleghem]

En reprenant ton code tel quel, j'obtenais un message: "Arguments trop nombreux pour 'Public Sub New()' "

J'ai alors écris la fonction comme ceci:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
    Class TablePagesDoc  ' Ensemble des requêtes SQL sur la table "PagesDoc"
        Dim oScanDataContext As New ScanBibLINQDataContext
        Dim oPagesDoc As New TblPagesDoc
        Sub Test(ByVal nInventaire As Integer, ByVal nPage As Integer)
            Dim PageDoc As New Object
            Dim oDtRowResult = (From oPagesDoc In oScanDataContext.TblPagesDoc _
                               Where oPagesDoc.Inventaire = nInventaire And _
                                     oPagesDoc.NumPage = nPage _
                               Select New TblPagesDoc)
 
        End Sub

Mais je ne retrouve aucun champ de la table dans "oDtRowResult". Que faire?

[Paul Van Walleghem]

Connais-tu une source documentaire qui explique la manière de récupérer le résultat des requêtes LINQ?

Je suis autoditacte et je patauge beaucoup sur cet aspect, pourtant si primordial, de l'accès aux données...

[tigunn]

Désolé j' en ai pas un qui pourrait faire référence.
Mais en regardant sur msdn tu trouveras: http://msdn.microsoft.com/fr-fr/data/cc936565.aspx

[Paul Van Walleghem]

Merci de l'info