Connexion à Oracle depuis EXCEL
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:
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?