Dim con As New ADODB.Connection
con.provider = "MSDAORA"
con.Open("name", "log", "pas")
Dim rst As New ADODB.Recordset
rst.LockType = adLockOptimistic
Set rst.ActiveConnection = con
rst.Source = "sql"
call rst.Open(, , adOpenDynamic)
rst.addnew
Выдает ошибку:
Run-time error '3251':
Текущий объект Recordset не поддерживает обновление. Это связано с ограничением поставщика или с выбранным типом блокировки.
При открытии рекордсета тип блокировки меняется с adLockOptimistic на adLockReadOnly
а тип курсора с Динамик на Статик.
Ответить
|