Erreur de DataReader

Version imprimable

Voir 40 message(s) de cette discussion en une page

salut tous le monde

je suis entrain de développez une application en VB.net

j'ai créer mon projet , la connection à la base de donnée se fait dans la première feuille du projet.
Code:

1 2 3 4 5 6 strsql = "select * from utilisateur where nom_util='" + txtnom.Text + "'" Dim myCommand As New SqlCommand(strsql, cnnbase) Dim myReader As SqlDataReader = myCommand.ExecuteReader() myReader.Read() 'traitement myReader.close()
ensuite la deuxime etape consiste a récupérer à partir ma base de donnée les information concernant l'application alors dans un MOdule je ve faire des get et des set de cette table de la base de donné voi la le code
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 Module MAppli Public Function gettitre( ) As String Dim strsql As String Dim res As String strsql = "select * from application " Dim myCommand1 As New SqlCommand(strsql, cnnbase) Dim myRe As SqlDataReader = myCommand1.ExecuteReader() myRe.Read() res = "" + x.GetString(0) myRe.Close() Return (res) End Function End Module
l'erreur est : Un DataReader associé à cette commande est déjà ouvert. Il doit d'abord être fermé.

est ce que vous voyer l'erreur, en tous les cas je la voi pas parceque j'ai vérifié que tous mes SqlDatareader sont fermé aprés utilisation

merci d'avance

03/07/2007, 17h08
Aspic

C'est quoi cnnbase ? sinon essaye d'executer ta requete dans la meme form que ton autre code qui fonctionne.

SInon vérifie bien que tous les objets sont fermés et détuits avant de faire une nouvelle requete.
03/07/2007, 17h21
mrkinfo

cnnbase c'est ma connection
comment je détruit tous les objets?

merci d'avance
03/07/2007, 17h29
Aspic
Citation:

Envoyé par kaabi

comment je détruit tous les objets?

merci d'avance

Tu affectes Nothing a ton objet :
Code:

1 2 'exemple MonObjet = Nothing
03/07/2007, 17h39
mrkinfo
toujours pareiln aspic

qunad je passe du formulaire de connexion à ma page principale

je fai
Code:

1 2 me.close frmprincipal.showDialog()
mais quand je regarde dans la barre de tache de windows la feuille de connection n'est pas fermé
est ce que il peu avoir un rapport avec ca ?
03/07/2007, 17h45
Aspic

Donne le code complet (mais pas de tout ton projet).

Sinon fait attention à ton orthographe :aie:

merci et desolé pour mes fautes d'orthographe je tape rapidement c'est pour ça.

Le code de ma page d'acceuil:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdentrer.Click
strsql = "select * from utilisateur where nom_util='" + txtnom.Text + "'"
                Dim myCommand As New SqlCommand(strsql, cnnbase)
                Dim myReader As SqlDataReader = myCommand.ExecuteReader()
                myReader.Read()
 
                If myReader.HasRows = False Then ' vérifier si la requete donne une réponse
 
                    MsgBox("Utilisateur inconnue", MsgBoxStyle.Exclamation, "Erreur d'authentification!!")
 
                    txtnom.SelectionStart = 0
                    txtnom.SelectionLength = txtnom.TextLength
                    txtnom.Focus()
                    txtnom.SelectAll()
                    txtmp.Text = ""
 
                    myReader.Close()
                Else
                    If myReader.GetString(1) = "" + txtmp.Text Then 'vérifie si le mot de passe est correcte 
 
 
                        frmprincipal.ShowDialog()
                        myReader.Close()
                        Me.Close()
end if

le code de ma page ou je veu afficher mes informations

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub Dialog1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        Dim strsql2 As String
 
 
        strsql2 = "select * from application "
 
        Dim myCommand1 As New SqlCommand(strsql2, cnnbase)
        Dim myRe As SqlDataReader = myCommand1.ExecuteReader()
 
        myRe.Read()
        lbltitreap.Text = "" + myRe.GetString(0)
 
 
        myRe.Close()
 
 
 
    End Sub

merci

03/07/2007, 18h00
Aspic

Donc dans ton premier code ca marche et dans ton deuxieme code ca plante c'est ca ? Rappel le message d'erreur complet ! et la ligne exacte ;)
03/07/2007, 18h18
mrkinfo

oui c'est ca

la ligne d'erreur dans le deuxieme

Code:

Dim myRe As SqlDataReader = myCommand1.ExecuteReader()

et le message d'erreur est :
Un DataReader associé à cette commande est déjà ouvert. Il doit d'abord être fermé.

Ok essaye avec ce code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdentrer.Click
strsql = "select * from utilisateur where nom_util='" + txtnom.Text + "'"
                Dim myCommand As New SqlCommand(strsql, cnnbase)
                Dim myReader As SqlDataReader = myCommand.ExecuteReader()
                myReader.Read()
 
                If myReader.HasRows = False Then ' vérifier si la requete donne une réponse
 
                    MsgBox("Utilisateur inconnue", MsgBoxStyle.Exclamation, "Erreur d'authentification!!")
 
                    txtnom.SelectionStart = 0
                    txtnom.SelectionLength = txtnom.TextLength
                    txtnom.Focus()
                    txtnom.SelectAll()
                    txtmp.Text = ""
 
                    myReader.Close()
                    myReader = Nothing 'detruit l'objet
                Else
                    If myReader.GetString(1) = "" + txtmp.Text Then 'vérifie si le mot de passe est correcte 
 
 
                        frmprincipal.ShowDialog()
                        myReader.Close()
                        myReader = Nothing 'detruit tout
                        Me.Dispose() 'libere les ressources
end if

Avant d'ecrire ExecuteReader
faut d'abord ouvrir ta connection
voilà:
Code:

1 2 3 4 5 6 7 8 9 10 Dim myCommand As New SqlCommand(strsql, cnnbase) cnnbase.open Dim myReader As SqlDataReader = myCommand.ExecuteReader() myReader.Read() . . . cnnbase.close
et c'est pa la peine de fermer ton dataReader

03/07/2007, 18h48
Aspic

D'apres le message d'erreur c'est pas ca le probleme...
03/07/2007, 18h49
alaa_85

Moi j'ai fait pas mal de projet et j'utilise cette methode .
03/07/2007, 19h35
Aspic

Citation:

Envoyé par alaa_85

Moi j'ai fait pas mal de projet et j'utilise cette methode .

Ok on attend le verdict de kaabi ;)
03/07/2007, 19h42
alaa_85

Citation:

Ok on attend le verdict de kaabi

ok

Ce n'est à mon humble avis pas la peine de partir dans des considérations de libération de ressources, Dispose() et tout le bazar.
Je dirais simplement que dans le cas où le premier test renvoie false, on passe dans le else. Dans le else, si le if est de nouveau faux, le datareader n'est pas fermé.
Je serais tenté de sortir le myReader.Close() des If et de le mettre après les test s If Else etc.

Cela donnerait un code du genre :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 If myReader.HasRows = False Then ' vérifier si la requete donne une réponse MsgBox("Utilisateur inconnu", MsgBoxStyle.Exclamation, "Erreur d'authentification!!") txtnom.SelectionStart = 0 txtnom.SelectionLength = txtnom.TextLength txtnom.Focus() txtnom.SelectAll() txtmp.Text = "" Else If myReader.GetString(1) = "" + txtmp.Text Then 'vérifie si le mot de passe est correct frmprincipal.ShowDialog() End if myReader.Close()
PS : il faut peut-être ajouter un end if encore avant le close, je ne suis pas spécialiste VB.NET.

03/07/2007, 23h50
Aspic

Citation:

Envoyé par SaumonAgile

PS : il faut peut-être ajouter un end if encore avant le close, je ne suis pas spécialiste VB.NET.

Oui exact ;) Mais cela ne va pas résoudre son probleme je pense...
04/07/2007, 01h23
mrkinfo

salut a tous
merci pour vos réponses mais malheureusement ca na aucun effet

Quand je rajoute cnnbase.open() ce message s’affiche

Code:

La connexion n'est pas fermée. L'état actuel de la connexion est ouvert

., c’est normal parce que je laisse ma connexion ouverte pour tout le projet
Et quand je rajoute ce que ma donnée ASPIC c’est pareil le même message s’affiche

et finalement quand je sors le .close des if c'est pareil le meme message

Question :

quand je fais l'appel à frmprincipal :

frmprincipal.showdialog()et Me.close pour fermer la page d'acceuil

la page d'acceuil ne se ferme pas et reste en arrière plan est ce que c'est normal?

merci d'avance
04/07/2007, 08h25
SaumonAgile

Citation:

Envoyé par Aspic

Oui exact ;) Mais cela ne va pas résoudre son probleme je pense...

Certes mais si tu avais pris la peine de lire plus que la dernière phrase, tu aurais vu que c'est simplement pour dire de ne pas prendre le code pour argent comptant et que j'avais déjà émis l'idée que le DataReader ne soit pas fermé dans tous les cas. :mrgreen:

Par contre Kaabi, ce n'est pas une très bonne idée de laisser la connexion ouverte en permanence. Le principe en .NET c'est d'ouvrir la connexion le plus tard possible et de la fermer le plus tôt. Tu fais exactement le contraire. ;)
Imagine un peu que toutes les applications fassent comme la tienne, les connexions à la base de données étant une ressource limitée, au bout de 5 minutes, tu ne pourrais déjà plus ouvrir de connexions.
Sachant en plus qu'en interne, le framework utilise en général un pool de connexions qu'il gère de manière transparente.

Je conseille donc d'ouvrir la connexion avant d'exécuter la requête et de la fermer juste après la lecture du DataReader.

Vérifie aussi avec le débogueur que tu passes dans TOUS les cas dans l'instruction qui ferme le DataReader.
04/07/2007, 09h27
Piotrek
Dans le code de la page d'acceuil je vois:
Code:

1 2 frmprincipal.ShowDialog() myReader.Close()
Si je comprends bien t'as un reader deja ouvert avec cnnbase, tu peux pas en ouvrir un deuxieme. Saumonagile t'as donne les bonnes indications sur les usages d'ado.net.

Il ne faut pas penser lineairement et faire des appels en db quand t'en a besoin. Cree un objet avec les champs necessaires, remplis le avec les donnees de la base d'un seul coup et utilise le par la suite. Ca t'evitera de te ballader avec une connection et un reader ouvert aussi longtemps

Voir 40 message(s) de cette discussion en une page