Discussion :

[rodrigue62]

Bonjour,

J'ai un script VB, qui nécessite à un moment une connexion à une base oracle. On déclare la connexion de la sorte :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim sResponse,Shell
  Dim connectionString: connectionString = "DRIVER={Microsoft ODBC for Oracle};SERVER=" & sSchema & ";User Id=" & sUser & ";Password=" & sPwd & ";"
  Dim connection: Set connection = CreateObject("ADODB.Connection")
  Dim rows:Set rows = CreateObject("ADODB.Recordset")
 
  Dim ShellO,fso,ScriptFinal
  Dim sSQL,sPrimary

Il fonctionne très bien sur un PC équipé de windows 7, mais sous windows 10 il génère une erreur sur le premier appel à la fonction "connection.Open connectionString" .

Pièce jointe 258098

Quelqu'un aurait-il une idée de ce qu'il faut modifier dans le script pour le rendre compatible avec Windows 10 ?

Merci d'avance pour votre aide.