Bonjour,
j'essaie d'accéder à une base oracle via du code VBA dans une feuille Excel. Voici mon code pour créer une connexion:
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
 
Function ConnexionBaseOracle(ByVal NomServeurOracle As String, ByVal NomBaseOracle As String _
    , ByVal NomUtilisateur As String, ByVal MotDePasse As String) As ADODB.Connection
 
    Set ConnexionBaseOracle = New ADODB.Connection
 
    'Définition du pilote de connexion
    'ConnexionBaseOracle.Provider = "OraOLEDB.Oracle.1"
 
    ConnexionBaseOracle.ConnectionString = "UID=" + NomUtilisateur & ";PWD=" & MotDePasse & _
        ";" & "DRIVER=msdaora;Server=" & NomServeurOracle & ";Database=" & NomBaseOracle & ";"
 
    ConnexionBaseOracle.CursorLocation = adUseClient
    ConnexionBaseOracle.Mode = adModeRead
 
    'Ouverture de la base de données
    ConnexionBaseOracle.Open
 
End Function
Et ça ne fonctionne pas...
J'ai le message d'erreur suivant:
[Microsoft][Gestionnaire de pilotes ODBC]Source de données non trouvée et nom de pilote non spécifié

Est-ce que quelqu'un peut m'aider?