Téléchargement
illégal
Posez votre question Signaler

[VB.net] Compter le nombre d'enregistrement [Résolu]

afrodje - Dernière réponse le 8 févr. 2008 à 12:17
Bonjour,
Je programme en vb.net avec une base MySQL.
J'aimerai compter le nombre d'enregistrement d'une requete.
Voici mon code : 
        Dim connection As New Class_connection
            connection.connect()
            'requete
            Dim requete_select As String = "SELECT * FROM membre"
            Dim MyAdapter As MySqlDataAdapter = New MySqlDataAdapter
            Dim oMySQLConnection As New MySqlConnection
            'dataset cache en memoire de donnée
            Dim ds As DataSet = New DataSet
            'Lien entre la base et la requête
            MyAdapter.SelectCommand = New MySqlCommand(requete_select, oMySQLConnection)
            Dim nombre As Integer = MyAdapter.SelectCommand.ExecuteScalar()
            MsgBox(nombre)

Evidement, nombre correspond aux nombres d'enregistrement mais je n'arrive pas à trouver la bonne méthode.
Merci @ vous.
Lire la suite 

[VB.net] Compter le nombre d'enregistrement »

5 réponses
Réponse
+0
moins plus
OrionS 58Messages postés 7 février 2008Date d'inscription 7 févr. 2008 à 21:56
bonsoir,

regarde l'adresse suivant je pense que cela peux t'aider : http://plasserre.developpez.com/v6-5.htm.

 Ajouter un commentaire
Ajouter un commentaire
Réponse
+0
moins plus
OrionS 58Messages postés 7 février 2008Date d'inscription 7 févr. 2008 à 22:03 

Dim intCount As Integer
intCount = ds.Tables("myTable").Rows.Count

Ajouter un commentaire
afrodje- 8 févr. 2008 à 09:44
Comment c'est possible d'avoir "mytable" en parametre alors que je voudrais compter les enregistrements d'une requete (et non d'une table)
afrodje- 8 févr. 2008 à 11:42
J'ai essayé le code suivant mais il me renvoi toujours 1, quelle que soit la requete 
Dim requete_select As String = "SELECT * FROM membre"

            
                'Lien entre la base et la requête
                Dim MyAdapter As MySqlDataAdapter = New MySqlDataAdapter
                MyAdapter.SelectCommand = New MySqlCommand(requete_select, connection.Getconnection_base)

                'Charge la table en mémoire 
                Dim ds As DataSet = New DataSet
                MyAdapter.Fill(ds)

                Dim nombre As Integer = ds.Tables.Count()
                MsgBox(nombre)
Ajouter un commentaire
Réponse
+0
moins plus
afrodje 897Messages postés 7 février 2008Date d'inscription 23 avril 2012Dernière intervention 8 févr. 2008 à 12:17
J'ai trouvé la solution 

 Dim requete_select As String = "SELECT nom FROM devis"
                'Lien entre la base et la requête
                Dim MyAdapter As MySqlDataAdapter = New MySqlDataAdapter
                MyAdapter.SelectCommand = New MySqlCommand(requete_select, connection.Getconnection_base)Dim obt As MySqlDataReader
                obt = MyAdapter.SelectCommand.ExecuteReader
                While obt.Read
                    MessageBox.Show(obt.GetString(0))
                End While

 Ajouter un commentaire - Site web
Ajouter un commentaire
Posez votre question
Ce document intitulé « [VB.net] Compter le nombre d'enregistrement » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?