[VB.NET] datareader toujours fermé

Bonjour

Je ne comprends pas pourquoi mon reader est toujours closed alors que je fais comme c'est indiqué dans mon bouquin de VB.NET.

Voici mon code, pouvez me dire où j'ai oublié un truc parce que çà fait trois heures que j'y suis et je comprends plus rien.

MErci d'avance.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Dim sqlverif As String = "select Marque, Modele from Speed_VoitureJoueur where IDJoueur =" & userid Dim cmdVerif As New SqlCommand(sqlverif, scConnexion) Dim chaineverif As String Dim drVerif As SqlDataReader = cmdVerif.ExecuteReader   If RetourneUneValeur(sqlverif) = "" Then chaineverif = "Vous ne possédez aucune voiture.<br>" Else chaineverif = "Vous possédez déjà les voitures suivantes : <br>" While drVerif.Read() chaineverif &= drVerif.GetValue(0) & ", " & drVerif.GetValue(1) End While End If

---

il faut faire peut etre un connection.open et une fois que tu as terminé un connection.close. ca devrait le faire;

Merci pour ton aide.

En fait, j'ai pas besoin de faire çà parce que le scConnexion qui est en argumenet est une fonction qui test l'ouverture de la connexion avant tout appel à la base et qui gère le fait que la conexion soit ouverte ou fermée.

Et en fait je viens de faire un ultime essai carje me suis dit que mon code fonctionanit bien avant et plus maintenant et la seule différence entre les deux c'est la mise à jour du FRAMEWORK.

En ghangeant de place mes élément j'ai réussi à le faire fonctionner, j'ai aps compris pourquoi, mais çà marche.

En fait, j'ai tout placé dans le ELSE et çà marche, vraiment l'informatique c'est magique. voilà code qui marche.

Code:

---

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

Dim sqlverif As String = "select Marque, Modele from Speed_VoitureJoueur where IDJoueur =" & userid Dim chaineverif As String   If RetourneUneValeur(sqlverif) = "" Then chaineverif = "Vous ne possédez aucune voiture.<br>" Else Dim cmdVerif As New SqlCommand(sqlverif, scConnexion) Dim drVerif As SqlDataReader = cmdVerif.ExecuteReader   chaineverif = "Vous possédez déjà les voitures suivantes : <br>" Do While drVerif.Read() chaineverif &= drVerif.GetValue(0) & ", " & drVerif.GetValue(1) Loop drVerif.Close() End If

---