VBScript et connexion ODBC avec IE11
Bonjour,
J'espère ne pas m'être trompée sur le forum car j'ai hésité avec le forum oracle.
J'ai une page web html locale qui se connecte en vbscript via une connexion ODBC à une base oracle.
J'étais en IE9 et cela fonctionnait très bien.
J'ai été "obligée" de passer à IE11 et mon script ne fonctionne plus.
J'ai eu plusieurs erreurs mais ce qu'il ressort c'est qu'il n'arrive pas à ouvrir la connexion odbc .
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45
|
Public sUser
Public sPassword
Public sConnection
Public sRequest
Public oConnection
Public oRecordSet
[...]
Public Sub dbConnect()
on error resume next
set oConnection = CreateObject("ADODB.Connection")
set oRecordSet = CreateObject("ADODB.Recordset")
oConnection.Open "DSN=odbc_oracle;" & "Uid=sUser;" & "Pwd=sPassword"
End Sub
[...]
Public Sub importData()
on error resume next
Call dbConnect
set oRecordSet = oConnection.Execute(sRequest)
' If error, display it
If Err.Number <> 0 Then
msgbox("Error : " & Err.Number & " - " & Err.Description)
Else
' on n'arrive jamais ici ...
[...]
End If
Call dbDisconnect
End Sub
[...]
function liste_platyne()
sRequest = "select count(*) as nb_rappro_platyne from BL_RAPPRO_VUE " & _
"where ETAT_RAPPRO = 'Rapprochement proposé' and LIBELLE_ECSH is not null " & _
"and (LIBELLE_SAPHYR is not null ) "
' Exécution de la requête
Call importData
End Function
Public Sub dbDisconnect()
oConnection.close
End sub |
La connextion odbc quand je la teste me dit : "Connection sucessfull" comme avant car elle n'a pas changé. Le serveur, user et password sont les mêmes.
Concernant les codes d'erreurs, j'en ai 2 différents avec le même message de fond :
erreur 3704 - cette opération n'est pas autorisée si l'objet est fermé
erreur 462 - le serveur distant n'existe pas ou n'est pas disponible
J'ai regardé sur pas mal de forum (dont celui là) et je n'ai pas trouvé de solution à mon problème car la partie connexion semble bien correcte et conforme à tous les exemples que je vois (et comme cela fonctionnait jusqu'à présent et que la personne qui a écrit le code était une pro de VB, je ne comprends pas).
Je suis aussi allée voir dans les paramètres IE11 et j'ai mis tous les points concernant les scripts à activer pour voir mais cela n'a rien changé.
Une idée que je n'aurais pas encore eu ?
Merci d'avance pour votre aide (et si je suis pas au bon endroit, merci de me l'indiquer).