Bonjour,

Dans ces lignes des 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
 'Déclaration de l'index de la Table Utilisateur
        Dim indexUsr As Integer = 0
 
        'Base de Donnée
        Dim MaConnexion As New OleDbConnection(MaBDD)
        'test d'ouverture
        If MaConnexion.State = ConnectionState.Closed Then MaConnexion.Open() 'Ouverture
 
        'Commande SQL pour récupérer tous les utilisateurs/Dossier de la base de données et transfert des résultats dans Users
        Dim CommandSQL As New OleDbCommand("SELECT * FROM Utilisateurs", MaConnexion)
        Using Users As OleDbDataReader = CommandSQL.ExecuteReader()
            While Users.Read() 'Tant que j'arrive à lire des donnees dans Users
                'Récupération des données dans les différence colones de la BDD
                Dim idU As String = Users("IDUser")
                Dim nomU As String = Users("NomUser")
                Dim prenomU As String = Users("PrenomUser")
                Dim mdpU As String = Users("MDPUser")
 
                'Affichage des données dans la Combo
                CB_ListeDossier.Items.Add(prenomU + " " + nomU)
                mdpDossier(indexUsr) = mdpU
                indexUsr = indexUsr + 1 'Enregistrement des mots de passes dans un tableau
            End While
        End Using
Je souhaite récupérer tout les mots de passes dans une variable mdpDossier() déclarée en Global. la ligne "mdpDossier(indexUsr) = mdpU" me génère l'Exception suivante :

Nom : Capture20190218.PNG
Affichages : 235
Taille : 37,8 Ko

Je ne comprend pas du tout pourquoi.

Pouvez vous m'aider.

Cordialement,