Добрый вечер! Пытаюсь через 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
Так же BOF,EOF = True Но в Field создаются столбцы таблицы. Если в них зайти названия (Name) будут верны, а значения в Value - "BOF и EOF имеет значение True, либо текущая запись удалена. Для выполнения операции требуется текущая запись."