erreur 432 sur Open

**stigma** · 23/05/2008, 13h58

Bonjour,
je veux me connecter à ma base SQL à partir de Excel. Quand j'arrive à l'instruction Open, j'ai le message d'erreur :

Nom du fichier ou de la classe introuvable lors de l'opération Automation. Erreur d'exécution 432

Mon 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
27
28
29
30
31
32
33
34
Dim Cnx_DB As New ADODB.Connection         
Dim Rst_DB As New ADODB.Recordset     
Dim s_SQL As String                         
Dim s_FichierINI As String                  

Sub Workbook_Open()

    s_FichierINI = ActiveWorkbook.Path & "\Courbes_Pas.ini"
    
    '---- Connexion à la base de donnée en utilisant le fichier UDL dont le nom est défini dans le fichier INI
    Cnx_DB.ConnectionString = "FILE NAME=" + LireINI(s_FichierINI, "Config", "FichierUDL")
    Cnx_DB.Open
etc....

End Sub
J'utilise un fichier UDL afin de pouvoir changer la source de données sans toucher à l'appli Excel. Lorsque je lance mon fichier UDL à la main, celui-ci se connecte correctement.
Pour info mon fichier Ini :

	
	Code  :
	Sélectionner tout -
	Visualiser dans une fenêtre à part
	12 [Config]
FichierUDL=Courbes_Pas.udl
et mon fichier UDL :

	
	Code  :
	Sélectionner tout -
	Visualiser dans une fenêtre à part
	123 [oledb]
; Everything after this line is an OLE DB initstring
Provider=SQLOLEDB.1;Password=bic;Persist Security Info=True;User ID=User_Lames;Initial Catalog=Lames-Test;Data Source=VERSSQL01