Discussion :

[sviolette]

Bonsoir,

Je suis débutante dans VB et ADO.NET dont j'ai besoin pour réaliser une petite application de gestion de stocks.

J'ai utilisé un DataReader pour extraire une colonne à partir d'une table. J'ai besoin de faire un test sur le contenu de cette colonne.

L'utilisateur doit taper dans une textbox son matricule avant d'accéder à l'application. Le matricule doit figurer dans la base de données.

Je vous prie de me donner la ligne de code qui me permettra de le faire ?

Voici mes lignes de code :

Code :

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

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
Private Sub Valider_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Valider.Click

        'Utilisation du DataReader
        Dim MyConnexion As New OleDb.OleDbConnection()
        OleDbConnection = ("Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & _
       "C:\Users\compaq\Documents\Visual Studio 2010\Projects\Gestion et suivi des stocks\Gestion et suivi des stocks.accdb")

        Dim Mycommand As OleDbCommand = MyConnexion.CreateCommand()
        Mycommand.CommandText = "SELECT MATRICULE FROM Personne WHERE FONCTION LIKE 'APPRO%'"
        MyConnexion.Open()
        Dim myReader As OleDbDataReader = Mycommand.ExecuteReader()
        
        'Test
        If Verification() Then
         --> ?   If Me.txt_mat_appro.Text = ??? données extraites Then
                Lecture_Appro.Show()
            Else
                MsgBox("Matricule introuvable" & vbOKOnly, vbCritical, "Erreur!")
            End If
        Else
            MsgBox("Matricule introuvable" & vbOKOnly, vbCritical, "Erreur!")
        End If
        myReader.Close()
        MyConnexion.Close()
    End Sub

Je vous serai très reconnaissante de m'aider.

[tomlev]

Utilise la méthode Read du DataReader pour avancer à la ligne suivante (au début tu es "avant" la première ligne, donc il faut forcément appeler Read avant de pouvoir lire quoi que ce soit), plus utilise les méthodes GetInt32/GetString etc pour récupérer les données

Tout est expliqué dans cet article :
http://dotnet.developpez.com/articles/ado1/vbnet/

[sviolette]

Je te remercie.
Je reviendrai pour poser d'autres questions à propos de la même application.
Votre cours sur VB est très bien fait.

Merci encore.