excel vba, mysql connexion ado

Je suis en train d'établir une connexion ADO entre excel sur ma machine locale et une base de données MySQL sur mon serveur.

Dans les exemples que j'ai vu (ici et ici, par exemple), il y a un pilote de la forme MySQL ODBC 5.x Driver. Il semble que, après l'installation de la dernière mysql connector /odbc télécharger (32-bit, pour correspondre à mon msexcel) du registre les fichiers de pilote HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\ODBC Driver\ sont désormais le nom de "SQL Server" et " SQL Server Native Client 11.0.' Je ne suis pas avoir du succès l'établissement d'une connexion à MySQL avec l'un de ces.

Mon VBA

Sub connect()
Dim Password As String
Dim SQLStr As String
Dim Server_Name As String
Dim User_ID As String
Dim Database_Name As String

Set rs = CreateObject("ADODB.Recordset") 'EBGen-Daily
Server_Name = "184.154.225.243"
Database_Name = "*******" ' Name of database
User_ID = "********" 'id user or username
Password = "*******" 'Password
Port = "3306"

SQLStr = "SELECT * FROM *******"

Set Cn = CreateObject("ADODB.Connection")
Cn.Open "Driver={SQL Server};Server=" & _
        Server_Name & ";Port=" & Port & ";Database=" & Database_Name & _
        ";Uid=" & User_ID & ";Pwd=" & Password & ";"

rs.Open SQLStr, Cn, adOpenStatic

Lors de l'exécution du ci-dessus, je reçois l'erreur [Microsoft][ODBC SQL Server Drive][DBNETLIB]SQL Server does not exist or access denied. L'erreur pour le "native client 11.0' pilote est Could not open a connection to SQL Server[53].

J'ai testé les paramètres de connexion à MySQL workbench et tout est fonctionnel. Ce qui se passe?

Driver={SQL Server} indique que vous essayez d'utiliser MSSQL pilotes au lieu de MySQL. Allez à Exécuter -> odbcad32 -> onglet Pilotes et de voir si le pilote MySQL est répertorié comme un pilote installé
Aussi, si vous utilisez la version 32 bits ou la version 64 bits de Microsoft office, vous pouvez télécharger la même version de la page de téléchargement que vous avez lié à

OriginalL'auteur deseosuho | 2015-04-19

9
1. Vérifiez si vous utilisez la version 32 bits ou la version 64 bits de Microsoft Office.
2. Basé sur la ci-dessus, de télécharger et d'installer le pilote MySQL à partir de la lien de téléchargement
3. Une fois le pilote ODBC installation terminée, vérifier l'ODBC composant logiciel enfichable pour voir le pilote est répertorié comme installé.
Si vous utilisez un OS 32 bits, puis le tout est de 32 bits. Utiliser la commande " Exécuter -> odbcad32.exe -> onglet Pilotes.

Si vous utilisez une version 64 bits de l'OS et Microsoft Office 32 bits, puis utilisez c:\windows\syswow64\odbcad32.exe -> onglet Pilotes.

Si vous utilisez une version 64 bits de l'OS et Microsoft Office est de 64 bits, puis utiliser la commande " Exécuter -> odbcad32.exe -> onglet Pilotes.

Si les pilotes MySQL sont installés correctement, ils doivent apparaître comme indiqué ci-dessus
1. Créez un DSN Système à l'aide de ODBC snap avec le pilote MySQL énumérés ci-dessus et tester la connexion pour voir si elle fonctionne.
2. Utiliser les mêmes paramètres lorsque vous essayez de créer un ODBC dans VBA.
Exemple:
```
Driver={MySQL ODBC 5.3 ANSI Driver};Server=localhost;Database=myDataBase;
User=myUsername;Password=myPassword;Option=3;
```
1. Une fois qu'il est établi que vous pouvez réussir à créer une connexion vers le serveur MySQL, puis changer le nom du pilote dans le registre (assurez-vous de mettre à jour les clés de registre) et essayez d'utiliser le nouveau nom que vous donnez comme SQL Server.
Rappelez-vous: Sur un 64 bit pour un système 32 bits pilotes:
```
HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\ODBC\ODBCINST.INI\ODBC Drivers
```
Un redémarrage peut être nécessaire après un changement du nom du pilote.

grande explication + 1
Je ne comprends pas ce que l'étape 6 est. N'est pas jusqu'à l'étape 5 suffisantes déjà? Je ne comprends pas quel est le lien à l'étape 6 est ainsi parce que de l'anglais

OriginalL'auteur slayernoah

Vous devez vous connecter pour publier un commentaire.