Problème de connexion oracle V11 [Résolu]

[boisdin]

Bonjour
A partir d'un source en VB, j'essaie de me connecter à une base oracle V11 via ODBC.

Je crée ma connexion ODBC, je l'ouvre, il n'y a pas d'erreurs mais l'état de la connexion reste à 0 (fermée) et donc je ne peux pas l'utiliser !!!

Les différentes chaines de connexion utilisées (voir ci-dessous) donnent toutes le même résultat.

Code :

1
2
3
4
cnx.ConnectionString = "provider=OraOLEDB.Oracle;Dsn=" & ODBCSource & ";Uid=" & utilisateur & ";Pwd=" & motDePasse
cnx.ConnectionString = "provider=MSDAORA.1;Data Source=" & ODBCSource & ";Uid=" & utilisateur & ";Pwd=" & motDePasse
cnx.ConnectionString = "provider=OraOLEDB;Dsn=" & ODBCSource & ";Uid=" & utilisateur & ";Pwd=" & motDePasse
cnx.ConnectionString = "provider=OraOLEDB.Oracle;Data Source=DMNDEV;" & ";Uid=" & utilisateur & ";Pwd=" & motDePasse

J'ai systématiquement l'état de la connexion à 0 et aucune erreur.

voici la séquence de code

Code :

1
2
3
4
        SET cnx = CreateObject("ADODB.Connection")
        cnx.ConnectionString = "provider=OraOLEDB.Oracle;Data Source=DMNDEV;" & ";Uid=" & utilisateur & ";Pwd=" & motDePasse
 
        cnx.Open

Je précise que le logiciel dans lequel je code ne me permet pas d'utiliser une variable de type ADODB.Connection donc je suis obligée de passer par un CreateObject.

Si quelqu'un pouvait m'aider, ce serait sympa.

[boisdin]

Il ne faut pas passer les paramètres de connxion dans la chaine ConnectionString mais directement en paramètre du cnx.open

Code :

1
2
3
4
5
        ' Création de la connexion'
        SET cnx = CreateObject("ADODB.Connection")
        cnx.ConnectionString = "provider=OraOLEDB.Oracle;" 
        ' Ouverture de la connexion'
        cnx.Open ODBCSource, utilisateur, motDePasse