Bonjour à tous,

Je souhaite écrire le programme suivant :

Lorsque je clique sur un bouton, le programme ouvre une base de données Access 2007, lit une requête sql et affiche par des MsgBox successives chaque valeur des champs demandés par la requête.

J'ai donc produit le code suivant :

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
Private Sub Command6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Command6.Click
 
        'Définition du pilote de connexion
        cnx.Provider = "Microsoft.ACE.OLEDB.12.0"
        'Définition de la chaîne de connexion
        cnx.ConnectionString = "H:\TX\[TX] IHM\Reverse_Engineering_Application.NET\Test.accdb"
        'Ouverture de la base de données
        cnx.Open()
 
        rst.Open("SELECT Test FROM Table_Test", cnx)
 
        'Affichage des valeurs du champ Test
        While Not (rst.EOF)
 
            MsgBox(rst("Test"))
 
            rst.MoveNext()
        End While
 
    End Sub
Il semblerait que le programme parvient à ouvrir la base mais malheureusement, j'obtient le message d'erreur suivant lors de l'affichage des MsgBox :

Une exception non gérée du type 'System.ArgumentException' s'est produite dans Microsoft.VisualBasic.dll

Informations supplémentaires*: L'argument 'Prompt' ne peut pas être converti en type 'String'.

Pouvez-me m'aider à résoudre ce problème ?