Discussion :

[arnolem]

bonjour, j'ai un DataSet contenant une dataTable de 3 colonne

[id][nom][prenom]
..1....aze.....aze
..2....rer......rer
..3....vtg......vtg
..4....bnh.....bnh
..5....xdc.....xdc

je veux retrouver le prénom si j'ai le nom et l'id de la personne.
comment utiliser le select ? merci

[jab]

Si l'id est comme je l'imagine défini comme primary key regarde du coté de Find de DataRowCollection. Propriété Rows de ta DataTable.

[leSeb]

Tu peux utiliser la méthode Select().

Exemple avec ton dataset.

Code :

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

1
2
3
4
5
6
7
   Dim lignes As DataRow()
   Dim ligne As DataRow
 
   lignes = monDataSet.Tables(0).Select("nom=" & strNom)
   If lignes.length = 1 Then
      strPrenom = lignes(0)(monDataSet.Tables(0).column("prenom"))
   End If

J'ai fais ce code sans compilateur donc je ne garantis pas qu'il n'y ait pas de fautes mais l'idée est la.

[jab]

Tu peux utiliser la méthode Select().

Exemple avec ton dataset.

Code :

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

1
2
3
4
5
6
7
   Dim lignes As DataRow()
   Dim ligne As DataRow
 
   lignes = monDataSet.Tables(0).Select("nom=" & strNom)
   If lignes.length = 1 Then
      strPrenom = lignes(0)(monDataSet.Tables(0).column("prenom"))
   End If

J'ai fais ce code sans compilateur donc je ne garantis pas qu'il n'y ait pas de fautes mais l'idée est la.

En effet si tu n'a pas de primary key, c'est la solution mais avec l'Id au lieu du nom car je suppose que lui est unique.

[arnolem]

désolé, j'avais plus le net,
ben nom l'id n'est pas unique, en fait c'est l'id d'une personne donc il y a 50 fois le meme id pour les 50 propriété de chacun

[arnolem]

Ben j'ai fait sa, mais j'avais bien une erreur :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
        Dim lignes As DataRow()
        Dim ligne As DataRow
        Dim strVar = "dn"
        Dim strData
        lignes = Ds.Tables(0).Select("var=" & strVar)
        If lignes.Length = 1 Then
            strData = lignes(0)(Ds.Tables("AD").Columns("data"))
        End If
        MsgBox(strData)

J'ai toujour une erreur sur :

Code :

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

        lignes = Ds.Tables(0).Select("var=" & strVar)

il me dit que strVar soit "dn" n'est pas une colonne, c'est normale puisque c'est une valeur

[arnolem]

bon, en fait je vais vous dire le fond de ma pensé, peut etre que je ne fais pas au plus simple. J'ai une Datatable qui a 3 colonnes : [id][var][data]

Dans [id], j'ai le numéro de l'utilisateur, par exemple 57
Dans [var], j'ai une propriété de l'utilisateur, par exemple prénom
Dans [data], j'ai la valeur de cette propriété, par exemple Paul

les ligne de mon dataTable resemble donc à ça

57 nom Momo
57 prenom Tutu
57 tel 0250055005
57 age 26
57 societe truc
58 nom Mumu
58 prenom Tata
...

Ce que j'aimerais, c'est remplacer les id par le nom :
Momo nom Momo
Momo prenom Tutu
Momo tel 0250055005
Momo age 26
Momo societe truc

J'essai donc de récuperer le nom par rapport à l'id et a la propriété afin de remplacer l'id par ce nom

[leSeb]

Oops Excuse moi, j'ai oublié les apostrophes.

Code :

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

lignes = monDataSet.Tables(0).Select("nom='" & strNom & "'")

TOn problème vient peut être de là ....

[arnolem]

oui c'était bien sa, je venais de trouver, il manque aussi un S à column
merci, je vais bientot avoir de nouveau problème mais en attendant, je faire le post