[VBA-E]Connectionstring avec source en DSN

Bonjour à tous,
J'ai regardé sur le forum afin de connecter une base oracle à un fichier excel à travers un dsn.

J'ai bien lu le tutoriel de Sébastien Curutchet, malheureusement, je me heurte à un problème en effet la chaîne de connexion cnx.ConnectionString="DSN="... ne fonctionne pas, le message d'erreur "Source de données introuvable et nom de pilote non spécifié" apparait.

J'ai édité le dsn que je souhaite utiliser j'ai bien le driver indiqué ainsi que la source de donnée.

Est ce qu'il y aurait une astuce que je n'aurai pas saisi ?
Merci de votre précieuse aide
Jaskoula

Citation:

---

Envoyé par jaskoula

la chaîne de connexion cnx.ConnectionString="DSN="... ne fonctionne pas

---

c'est un peu maigre pour essayer de te répondre

tu n'aurais pas un code un peu plus complet ?

sinon tu as http://www.connectionstrings.com/?carrier=oracle

Bonjour,

Effectivement, je n'ai pas été très complet dans ma demande, voici plus d'informations, je travaille sur une base oracle 10g, ce que j'aimerai faire c'est développer des requêtes en sql à travers "Toad" directement sur la base oracle. Puis depuis excel, concevoir une macro me permettant :

1. De se connecter à la base en question
2. D'exécuter la ou les requêtes

J'ai essayé plusieurs chaînes de connexion dont :

Dim cnx As ADODB.Connection
Set cnx = New ADODB.Connection

a)cnx.ConnectionString="Driver={Microsoft ODBC for Oracle};Server=192.xxx.x.xx;Uid=Username;Pwd=Password"
cnx.Open
=>Message : ORA-12514:TNS:listener does...
b)cnx.ConnectionString="Driver={Oracle in Oraclient10g};Server=192.xxx.x.xx;Uid=Username;Pwd=Password"
cnx.Open
=>Message : ORA-12560:TNS:protocol adapter error

Pour la petite histoire le driver Oracle in OraClient10g est celui indiqué dans le dsn, utilisé par l'interface client de l'application :cry:

Je suis un peu perdu, surtout que je ne sais pas si, à partir du moment, où la connexion s'effectue je peux appeler une requête sql ????

Merci de l'aide que vous pourrez m'apporter
Jaskoula

Re-Bonjour,
Je réponds à moi-même concernant ma problématique de connexion.
J'ai utilisé une autre méthode que celle du connectionString car je butais sur un problème de pilote odbc !!!

Voici ce que j'ai utilisé pour finir :

Code:

---

1 2 3 4 5

With ActiveSheet.QueryTables.Add(Connection:="ODBC;DRIVER{Oracle in OraClient10g};SERVER=192.1XX.X.XX;Database=xx;DBQ=xx;UID=XX;PWD=XX",Destination :=Range("c4")) .CommandText=pRequete .Name="NomRequete" .Refresh End With

---

Cette méthode fonctionne, c'est à dire la requête en dur me retourne bien le résultat escompté, par contre, à titre de curiosité j'aimerai connaitre vos avis concernant votre expérience et surtout les défauts constatés avec ce script ???

La deuxième question est celle-ci : Y a t'il moyen d'exécuter en utilisant le moyen de connexion ci-dessus des requêtes développées à même la base de donnée ?

Salutations
Jaskoula