Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 31/01/2012, 16h46   #1
Futur Membre du Club
 
Inscription : juin 2007
Messages : 68
Détails du profil
Informations personnelles :
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juin 2007
Messages : 68
Points : 18
Points : 18
Par défaut Connexion ADODB pour MySQL

Bonjour,

Je cherche à ma connecter à une BDD sur un serveur par VBA
Le driver MySQL est bien installé sur le poste client et la connexion à la bdd est activée comme en atteste le "connection successfull" délivré après appui sur le bouton test de MySQL/ODBC Connector

Voici le code d'un fichier test qui fonctionne parfaitement en local mais qui lors de la connexion serveur me renvoie:"ERREUR: Source de données introuvable et nom de pilote non spécifié" (le pointeur VBA stoppe sur la ligne 7)

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
Public bd As New ADODB.Connection
Public enr As New ADODB.Recordset
 
Sub chargement()
 
chaine = "DRIVER={MySQL ODBC 5.1 Driver};SERVER=192.168.1.18;DATABASE=test;USER='moi';PASSWORD='coucou';OPTION=3;"
bd.Open chaine
 
enr.activeConnection = bd
 
li = 17
col = 5
 
  With enr
    .CursorLocation = adUseServer
    .CursorType = adOpenKeyset
    .LockType = adLockOptimistic
    .Open "SELECT * FROM table_test" 'ORDER BY nom ASC"
  End With
 
 
 
Do While Not enr.EOF
Cells(li, 5) = enr("id")
Cells(li, 6) = enr("nom")
Cells(li, 7) = enr("prenom")
Cells(li, 8) = enr("DN")
Cells(li, 9) = enr("commentaire")
 
li = li + 1
enr.MoveNext
Loop
enr.Close
bd.Close
End Sub
Bien entendu les infos transmises dans la variable "chaine" sont conformes aux infos de connexion paramétrées dans ODBC Connector

Je suppose qu'il y a dans mon projet une bibliothèque non activée ???
Mais laquelle...

Merci pour vos idées.

A+
Philippe
filtep est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 31/01/2012, 17h20   #2
Rédacteur/Modérateur
 
Avatar de jpcheck
 
Jean-Philippe ANDRÉ
Inscription : juillet 2007
Messages : 7 876
Détails du profil
Informations personnelles :
Nom : Jean-Philippe ANDRÉ
Âge : 28
Localisation : France

Informations forums :
Inscription : juillet 2007
Messages : 7 876
Points : 10 746
Points : 10 746
Envoyer un message via MSN à jpcheck
Hello,

je peux te proposer un peu de lecture très utile sur les connections ODBC :
http://ledzeppii.developpez.com/odbc-access/

Les fonctions de tests te permettront notamment de trouver d'où vient l'erreur
__________________
Pas de question technique par MP, je ne réponds pas

Mon perso ? Une vraie brute

Tutos Access, Tâches planifiées et Batch,Tables de Paramètres sous Access, Excel et Batch, Tâches planifiées et Access
jpcheck est actuellement connecté   Envoyer un message privé Réponse avec citation 00
Vieux 31/01/2012, 17h26   #3
Futur Membre du Club
 
Inscription : juin 2007
Messages : 68
Détails du profil
Informations personnelles :
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juin 2007
Messages : 68
Points : 18
Points : 18
Merci pour cette réponse,

j'ai déjà étudié ce lien et je n'y ai malheureusement pas trouvé de réponse à mon problème...

Pour ce qui est des fonctions de tests, je ne les ai pas vues, c'est où ?

Sinon rien qui te semble en cause dans mon bout de code ?

A+
Philippe
filtep est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 31/01/2012, 17h39   #4
Rédacteur/Modérateur
 
Avatar de jpcheck
 
Jean-Philippe ANDRÉ
Inscription : juillet 2007
Messages : 7 876
Détails du profil
Informations personnelles :
Nom : Jean-Philippe ANDRÉ
Âge : 28
Localisation : France

Informations forums :
Inscription : juillet 2007
Messages : 7 876
Points : 10 746
Points : 10 746
Envoyer un message via MSN à jpcheck
Perso, je crée des DSN, ca me simplifie le boulot d'habitude

N'y a-t-il pas une histoire de "ODBC;" en début de chaine de connection à envisager (probleme moteur Jet en principe)
http://ledzeppii.developpez.com/odbc-access/#LVII

La partie test serait ici:
http://ledzeppii.developpez.com/odbc-access/#LIII-C
__________________
Pas de question technique par MP, je ne réponds pas

Mon perso ? Une vraie brute

Tutos Access, Tâches planifiées et Batch,Tables de Paramètres sous Access, Excel et Batch, Tâches planifiées et Access
jpcheck est actuellement connecté   Envoyer un message privé Réponse avec citation 00
Vieux 31/01/2012, 19h08   #5
Futur Membre du Club
 
Inscription : juin 2007
Messages : 68
Détails du profil
Informations personnelles :
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juin 2007
Messages : 68
Points : 18
Points : 18
Bon bah finalement je me suis connecté avec le DSN, ça marche et c'est mieux, ça évite d'avoir les id de connexion et les mdp dans le code.

Merci de ton aide

A+
Philippe
filtep est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 11h23.


 
 
 
 
Partenaires

Hébergement Web