Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Recordset не видит базу данных
 
Добрый вечер!
Пытаюсь через vba подключиться к базе данных MySQL.
Подключение проходит хорошо, и я могу вносить данные в базу данных.
Но когда пытаюсь наоборот загрузить данные в recordset пишет что BOF и EOF = True.
В чем может заключаться ошибка?
Код
Dim oConn As Object
    Set oConn = New ADODB.Connection
    Dim s As String
    oConn.Open "DRIVER={MySQL ODBC 5.3 ANSI Driver};" & _
               "SERVER=localhost;" & _
               "DATABASE=база" & _
               "UID=root;" & _
               "PASSWORD=пароль;" & _
               "PORT:3306;" & _
               "charset=cp1251;" & _
               "Option=3;"
    
    Dim rec As ADODB.Recordset
    Set rec = New ADODB.Recordset

    s = "select * from person"

    With rec
        .ActiveConnection = oConn
        .LockType = adLockReadOnly
        .CursorLocation = adUseClient
        .CursorType = adOpenDynamic
        .Open s
    End With
Изменено: kkrasilov - 15 Июн 2018 23:24:53
 
Может вот это стоит поменять:
Код
.LockType = adLockReadOnly
С уважением,
Федор/Все_просто
 
Пробовал со всеми вариантами .LockType - не помогает.
 
Не может быть.А так?
Код
   .LockType = adLockOptimistic
        .CursorType = adOpenKeyset
 
Так же BOF,EOF = True
Но в Field создаются столбцы таблицы.
Если в них зайти названия (Name) будут верны, а значения в Value - "BOF и EOF имеет значение True, либо текущая запись удалена. Для выполнения операции требуется текущая запись."
Изменено: kkrasilov - 18 Июн 2018 22:57:01
 
Установил драйвер MySQL ODBC 3.51 Driver - заработало.
Тему можно закрывать!
Страницы: 1
Читают тему (гостей: 1)
Наверх