Discussion :

[Krys9292]

Bonjour,

J'ai lu beaucoup de cours et j'ai recherché un peu partout.

Et je viens ici juste pour comprendre un truc qui me bloque sur le principe d'instanciation.

Exemple :

si je fais :

Code :

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

Dim Resultat as DataRow = Table.select()

Ça marche.

Mais je ne peux pas le découpe en deux :

Code :

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

1
2
Dim Resultat as DataRow
Resultat = Table.selct()

Il considère Resultat comme Nothing.

Quelqu'un peut m'expliquer le principe?
J'arrive toujours pas à piger pourquoi...

Merci à tous de vos aides

[Phil Rob]

Bonjour,
C'est peut-être parce que tu as oublié le e du Select dans ton 2ème code ...


A noter tout de même que ces écritures fonctionnent tant que le Select n'a qu'une seule ligne à renvoyer.
...

[Krys9292]

Merci Phil de ta réponse!

Pour le code, j'ai tapé vite fait un bout de code pour expliquer ce que je ne comprends pas bien.
L'absence du e dabs select est dû uniquement parce que j'ai fait une erreur de frappe dans mon message.
Dans mon appli c'est bon, mais ça passe pas (il me met "pas possible de convertir un DataRow en DataRow").

Pour faire simple, je filtre et tri avec un Table.Select et je veux récupérer le résultat.
De ce que je viens de comprendre + mes recherches avant, un select renvoie un tableau de DataRow.
Si le select renvoie plusieurs DataRow, je ne peux pas stocker le résultat dans un DataRow. Ca va planter.
Je te remercie de m'avoir attiré l'attention là-dessus.

Mais du coup, dans quoi je stocke le résultat de mon select?
J'ai essayé hier soir dans un array.
Mais ça n'a pas marché.

Tu me conseille quoi?

[Phil Rob]

Je ne suis pas en mesure de tester tout de suite, mais j'ai ces 2 exemples de codes sous la main :

Le code suivant produit l’affichage par MessageBox des noms des personnes habitant une localité donnée qui a été encodée dans le TextBox nommé TCherche.

Code :

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

1
2
3
4
5
Dim DT As DataRow()
DT = MesDonnees.Tables("PersEtLoc").Select("Localite = '" & TCherche.Text & "'")
For Each R As DataRow In DT
  MessageBox.Show(R.Item("NomPers"))
Next

Le code suivant produit l’affichage par MessageBox de la localité de la première personne dont le nom est celui qui a été encodé dans le TextBox nommé TCherche.

Code :

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

1
2
3
Dim R As DataRow
R = MesDonnees.Tables("PersEtLoc").Select("NomPers = '" & TCherche.Text & "'")(0)
MessageBox.Show(R.Item("Localite"))

Ici les recherches se font sur un des DataTable stockés dans un DataSet, sur le DataTable nommé "PersEtLoc". Chez, toi il n'y a apparemment qu'un seul DataTable : Table. Ce détail ne change rien au problème.
Dans le premier exemple, on s'attend à recevoir plusieurs lignes en résultat et on déclare un DataRow().
Dans le deuxième exemple, on n'attend qu'un seul résultat et s'il debvait y en avoir plusieurs, on ne prend quand mêm que le prelmier, celui d'indice 0 : ... TCherche.Text & "'")(0).

Pour chercher davantage sur ton problème, il me faudrait un extrait de code dans un projet test que je puisse exécuter.

...

[umfred]

tu n'as pas oublié les parenthèses après DataRow pour indiquer que cela doit être un tableau de DataRow (table.select() renvoie un tableau de DataRow
(si Table est un DataTable)
https://learn.microsoft.com/fr-fr/do...t?view=net-7.0

[Krys9292]

Merci beaucoup à vous tous.

En effet, j'ai oubliez les () dans la déclaration DataRow.

Bien à vous.