Bonjour,
je ne sais pas si quelqu'un ici a déjà essayé et réussi à attaquer depuis excel un serveur MySQL avec des liens OLE mais je tente ma chance après 3 jours de recherches infructueuses.
J'ai installé le pilote suivant (recommande sur le net) :
myoledb-3.9.6
que j'ai trouver sur MySQL.com
J'ai bien fait l'install comme prévu , (on lance le msi qui s'installe sur le C:\Program File, puis j'ai copié dans C:\WINNT\system32 les fichiers libmysql.dll et MyProv.dll et j'ai bien sur fait un regsvr32.exe MyProv.dll)
Voici le code que j'utilise dans VB pour tester la connexion:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 Sub test() Dim objConnexion, chaineConn ' Créer l'objet ADO Set objConnexion = New ADODB.Connection ' Set objConnexion = Server.CreateObject("ADODB.Connection") ' chaineConn = "provider=MICROSOFT.JET.OLEDB.4.0;DataSource=D:\Cedric\R\02 - Base\base.mdb;User ID=nonDusager;Password=MotDePasse;" ' Ouvrir la base sans DSN avec chaîne de connexion chaineConn = "provider=MySQLProv;server = 141.71.4.40;DataSource=eurocorp;User ID=root;Password=saq;" objConnexion.Open chaineConn ' Traitement... ' Fermer la connexion et détruire l'objet objConnexion.Close Set objConnexion = Nothing End Sub
Bien sur ça ne marche pas , j'ai le message d'erreur suivant "erreur d'execution -2147467259 (80004005) "
Erreur que je ne sais pas résoudre...
Un expert est dans la place ?
Merci
Partager