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