Problème avec data reader

Bonjour à tous,

J'ai une variable de type Array que j'essaye de remplir avec un DataReader.

Je vais essayer de m'expliquer:
J'ai une table T_mdp (user_nom [string], user_id [int32], mdp [string])

Je voudrais mettre dans un Array les champs mdp et user_id.
voilà mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Dim MyConnexion As OleDbConnection = New OleDbConnection(ConnectionString) Dim Mycommand As OleDbCommand = MyConnexion.CreateCommand() strSQL = "SELECT T_mdp.mdp, T_mdp.user_id " & _ "FROM T_mdp " & _ "WHERE T_mdp.user_nom='Username'" Mycommand.CommandText = strSQL MyConnexion.Open() Dim Reader As OleDbDataReader = Mycommand.ExecuteReader() Dim arrResult(2) For i = 1 To 2 If Reader.Read() Then arrResult(0) = True arrResult(i) = Reader(i - 1) Else If Not arrResult(0) = True Then arrResult(0) = False End If Next Reader.Close() MyConnexion.Close()

---

J'arrive à remplir le mdp, mais il mets la valeur Null pour le user_id, l'Array reste donc (True, mdp, Null), et je ne compreds pas pourquoi, car le champs est bien rempli sur la table.

Est-ce que quelqu'un pourrait m'aider, svp?
Merci d'avance

Pour tester, j'ai changé l'ordre de mon SQL:

Code:

---

1 2 3

strSQL = "SELECT T_mdp.user_id, T_mdp.mdp " & _ "FROM T_mdp " & _ "WHERE T_mdp.user_nom='Username'"

---

et maintenant je retrouve bien l'user_id, mais pas le mdp! :?

Il y a donc un problème pour trouver la dernière valeur.

Bonjour.

Ta boucle est un peu bizarre car quand tu fais Reader.Read, cela déclenche la lecture de la ligne suivante du Reader.

Donc comme ton select ne rend qu'une seule ligne ça ne le fait pas du tout !

D'ailleurs, si je comprends ce que tu veux faire, tu n'as pas besoin du For :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim Reader As OleDbDataReader = Mycommand.ExecuteReader() Dim arrResult(2) If Reader.Read() Then arrResult(0) = True arrResult(1) = Reader(0) arrResult(2) = Reader(1) Else arrResult(0) = False End If Reader.Close()

---

Devrait suffire.

Cdt.

Merci olsimare,

Je suis heureux de te dire que je commence a me débrouiller un peu avec du vb... (très peu pour l'instant, mais c'est déjà quelque chose ;))

J'ai besoin du for, car j'ai mis 2 comme un exemple, dans mon application j'utilise n. Il faudrait faire l'inverse:

Code:

---

1 2 3 4 5 6 7 8

If Reader.Read() Then For i = 1 To 2 arrResult(0) = True arrResult(i) = Reader(i - 1) Next Else If Not arrResult(0) = True Then arrResult(0) = False End If

---

Je m'explique:
Pour n'avoir pas besoin d'écrire le code du data reader toutes les fois, j'ai fait la fonction suivant:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Public Function MyReader(ByVal strCon As String, ByVal intNumber As Int16, ByVal strSQL As String) As Array Dim MyConnexion As OleDbConnection = New OleDbConnection(strCon) Dim Mycommand As OleDbCommand = MyConnexion.CreateCommand() Mycommand.CommandText = strSQL MyConnexion.Open() Dim Reader As OleDbDataReader = Mycommand.ExecuteReader() Dim arrResult(intNumber) If Reader.Read() Then For i = 1 To intNumber arrResult(0) = True arrResult(i) = Reader(i - 1) Next Else If Not arrResult(0) = True Then arrResult(0) = False End If Reader.Close() MyConnexion.Close() Return arrResult End Function

---

et toutes les fois où j'ai besoin d'un data reader, je fais, par exemple:

Code:

---

1 2 3 4

strSQL = "SELECT T_mdp.user_nom " & _ "FROM T_mdp LEFT JOIN T_log ON T_mdp.user_id=T_log.user_id " & _ "ORDER BY T_log.dernier_log DESC" arrReader = MyReader(ConnectionString, 1, strSQL)

---

(intNumber c'est la quantité des champs du SELECT)
Après, j'utilise la première position du vecteur pour savoir s'il y a eu des résultats dans ma requête...

Tu pense que c'est un bon méthode?

Bonjour.

Concernant le fait que cela soit la bonne méthode, j'utilise plutôt un dataset pour faire ce genre de truc plutôt qu'un datareader, mais pourquoi pas, si cela convient...

Par contre, passer le nombre de colonne est inutile, tu peux utiliser le datareader.FieldCount pour obtenir le nombre de colonne retourné.

D'autre part, si tu veux vraiment que ton code soit réutilisable, tu devrais créér une classe qui met à dispo non seulement les différents item, mais également une propriété indiquant que la requête a bien retourné quelque chose.

Cdt.

Ok, merci pour l'astuce...

Comment j'avias dit, je commence à me débrouiller maintenant, je peux voir que j'ai un long parcours à faire...
:king: