Попытка подключить базу данных MySQL к листу Excel с использованием визуальных основ - PullRequest
0 голосов
/ 25 сентября 2018

Я чувствую, что это простая проблема, но я не могу понять это.Я пытаюсь установить соединение между таблицей Excel и сервером MySQL, но получаю сообщение об ошибке «Ошибка во время выполнения» -2147467259 (80004005) ':
[Microsoft] [ODBC Driver Manager] Имя источника данных не найдено ине указан драйвер по умолчанию "У меня установлены необходимые драйверы, поэтому я не уверен, куда идти, это код, который у меня есть до сих пор

Dim conn As New ADODB.Connection
Dim TableName As String
Dim sqlstr As String
Dim rs As ADODB.Recordset

Dim CRow As Long, Trow As Long
Dim Column1 As Integer, Column2 As Integer

Set conn = New ADODB.Connection

conn.Open ("DRIVER = {MySQL ODBC 5.3 Unicode Driver}" _
& ";SERVER=127.0.0.1" _
& ";DATABASE=tmi_stock" _
& ";UID=root" _
& ";PWD=MyRoot2018")

Set rs = New ADODB.Recordset

sqlstr = "INSERT INTO tester VALUE(1, 2)"
rs.Open sqlstr, conn, adOpenStatic

Set rs = Nothing
conn.Close
Set conn = Nothing
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...