Не могу понять почему не работает простейший код, обновляющий поле name?
Поле не обновляется???
(Доступ к серверу MySQL по ODBC)

Dim cnn As ADODB.Connection
Dim rcs As New ADODB.Recordset

cnn.ConnectionString = "Provider=MSDASQL;FileDSN=C:\ClientsMySQL\clientsmysql;UID=u0080760_yanutsh;PWD=y3233207;"
cnn.Open

rcs.Open "testinnodb", cnn, adOpenKeyset, adLockOptimistic
rcs.Fields("name") = "вася"
rcs.Update

rcs.Close

AkinaНу если код ИМЕННО ТАКОЙ, то явно нехватает



Виноват, такая строчка есть (не вошла в листинг).
Соединение происходит нормально, все записи читаются.

_гурДadcmdTable
?

не влияет на результат.

_гурД,
принудительно все обновляется !?

"CursorLocation коннекта - = adUseServer"
VB не дает возможности это продставить.

В таком варианте...:
-----------------------------------------------------------
Dim rr As New ADODB.Recordset
Dim cnn As New ADODB.Connection
cnn.ConnectionString = "Provider=MSDASQL;FileDSN=C:\ClientsMySQL\clientsmysql;UID=user;PWD=pass;"
cnn.Open

s = "select testinnodb.name, testinnodb.kod " & _
"from " & _
"testinnodb " & _
"where testinnodb.kod = 10"

Set rr = New ADODB.Recordset
rr.Open s, cnn ' adOpenStatic, adLockBatchOptimistic
rr!name = "Саша"
rr.UpdateBatch
rr.Close
------------------------------------------------------------------
на операции
rr!name = "Саша"
выдается сообщение что текущий объект Recordset не поддерживает обновление. Это связано с ограничение поставщика или типом блокировки.

Проблема решилась добавлением

rr.CursorLocation = adUseClient

перед открытием набора записей.

Всем спасибо за подсказки и пинки мыслей в правильном направлении :-)

Кстати и исходный вариант кода тоже заработал.