Bonjour à tous,
J'ai une petite application VB 6.0 qui est censé se connecter à une base de données ACCESS, le problème est que dès que j'essaye de me connecter à la base de données, j'ai cette erreur qui apparait :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Erreur N°-2147023897 (800703E7)
Erreur Automation
Erreur lors d'une opération de pagination
Code la connexion à la base de données :

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
 
 
option explicit
 
Public Connexion As New ADODB.Connection
Public sChaineconnexion As String
Public sCheminbase As String
 
...
 
Public Sub Connexionbase()
 
    sCheminbase = unite & "TEST.MDB"
 
 
    sChaineconnexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sCheminbase & ";Persist Security Info=False;"
    sChaineconnexion = sChaineconnexion & "Jet OLEDB:Database Password="
 
    Connexion.Open sChaineconnexion
 
End Sub
Les composants ADO (MSDAC 2.8 connrectement installé) sont à jour et là j'avoue que je ne vois pas d'où vient le problème.