Пытаюсь добавить новую строку, а мне: Ошибка при вызове метода контекста (AddNew)RecordSet.AddNew();по причине:
Произошла исключительная ситуация (ADODB.Recordset): Текущий объект Recordset не поддерживает обновление. Это связано с ограничением поставщика или с выбранным типом блокировки.


   Конект = Новый ComОбъект("ADODB.Connection");
   СтрокаСоединения3 ="Provider=MSDAORA.1;Password=pswd;User ID=user;Data Source=dianet;Persist Security Info=True";
   Конект.ConnectionString = СтрокаСоединения3;
       Попытка
       Конект.Open();
       //Сообщить("Подключились к шине!");
   Исключение
       Сообщить("Подключение к шине не удалось!");
       Возврат;
   КонецПопытки;
   Command =Новый  ComОбъект("ADODB.Command");
   Command.ActiveConnection= Конект;
   Command.CommandText ="select * from errors";
   
   RecordSet = Новый ComОбъект("ADODB.Recordset");
   Recordset.Open("select * from errors",конект,2,4);
   RecordSet.AddNew();
   RecordSet.Fields("MSG").value="sd";
   RecordSet.Update();
   Сообщить(RecordSet.Fields("id").Value);
   Recordset.Close();
   RecordSet="";
   Конект.Close();

Продолжайте наблюдения.

А заодно доложите, чем insert не нравится.

через инсерт работает... делаю через addnew() чтобы сразу отловить новый id
Сообщить(RecordSet.Fields("id").Value);

пробовал и lock=3 (adLockOptimistic) тоже самое

(4) может быть есть обязательные поля ?

(5) нету
вот все поля ошибка таже

   RecordSet = Новый ComОбъект("ADODB.Recordset");
   Recordset.Open("select * from errors",конект,2,4);
   RecordSet.AddNew();
   RecordSet.Fields("MSG").value="sd";
   RecordSet.Fields("NAME").value="name";
   RecordSet.Fields("DSC").value="not use";
   RecordSet.Fields("ETABLE").value="N";
   RecordSet.Fields("LOG").value="Y";
   RecordSet.Update();

(6)
а ещё возможно стоит сделать курсор на стороне клиента
Recordset.CursorLocation = 3;

(7) + 1
http://support.microsoft.com/kb/255707/ru

не помогло

Recordset.Open("select * from errors",конект,3,4);

(9) ты не то написал
adOpenDynamic(2) стоял правильно

попробуй

Recordset.CursorLocation = 3;
Recordset.Open("select * from errors",конект,2,3);

(10) тоже самое

по синтаксису вроде правильно тройку ставил

objRecordset.Open source,actconn,cursortyp,locktyp,opt

может в строке соединения что добавить надо?

(13) с mdb вот так работает:
MyCon = Новый COMОбъект ("ADODB.Connection");
           MyCon.Open ("Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=D:\1.MDB");
           MyRst = Новый COMОбъект ("ADODB.Recordset");
           MyStr = "select * from zdania where NOM_REG_VI=1 and id_predpr=1 and id_ik=1 and id_zdan=1";
           MyRst.Open (MyStr, MyCon, 2, 3);//adOpenDynamic, adLockOptimistic
           MyRst.Fields("Resultat").Value="Киргуду"; // Присвоение
           MyRst.Update(); //Запись
           MyRst.Close();
           MyCon.Close();

те без всяких AddNew() просто проапдэйтить....сейсас опробую

Ошибка при установке значения атрибута контекста (Value) RecordSet.Fields("MSG").value="sd";
по причине:
Произошла исключительная ситуация (ADODB.Field): Текущий объект Recordset не поддерживает обновление. Это связано с ограничением поставщика или с выбранным типом блокировки.

нет не хочет. сдается мне не тем объектом пользуюсь

(16) покажи код

Конект = Новый ComОбъект("ADODB.Connection");
   СтрокаСоединения3 ="Provider=MSDAORA.1;Password=1C1C1C;User ID=1C;Data Source=dianet;Persist Security Info=True";
   Конект.ConnectionString = СтрокаСоединения3;
       Попытка
       Конект.Open();
       //Сообщить("Подключились к шине!");
   Исключение
       Сообщить("Подключение к шине не удалось!");
       Возврат;
   КонецПопытки;
   Command =Новый  ComОбъект("ADODB.Command");
   Command.ActiveConnection= Конект;
   Command.CommandText ="select * from errors";
   
   RecordSet = Новый ComОбъект("ADODB.Recordset");
   Recordset.Open("select * from errors",конект,2,3);
   //RecordSet.AddNew("MSG","sadfsdf");
   RecordSet.Fields("MSG").value="sd";
   //RecordSet.Fields("NAME").value="name";
   //RecordSet.Fields("DSC").value="not use";
   //RecordSet.Fields("ETABLE").value="N";
   //RecordSet.Fields("LOG").value="Y";
   RecordSet.Update();
   Сообщить(RecordSet.Fields("id").Value);
   Recordset.Close();
   RecordSet="";
   Конект.Close();

попробовал ещё так, тоже не работает


   RecordSet = Новый ComОбъект("ADODB.Recordset");
   Recordset.Open("select * from errors",конект,2,3);
   RecordSet.AddNew("MSG","sadfsdf");

(18) а где
Recordset.CursorLocation = 3;

shuhard, прошу прощения...затупил

всё вроде заработало, щас юзера пропишу в конекте нормального и всё )))

{Форма.Форма.Форма(76)}: Ошибка при вызове метода контекста (Update)
   RecordSet.Update();
по причине:
Произошла исключительная ситуация (Microsoft OLE DB Provider for Oracle): ORA-01031: insufficient privileges


     ОчиститьСообщения() ;
   Конект = Новый ComОбъект("ADODB.Connection");
   СтрокаСоединения3 ="Provider=MSDAORA.1;Password=pswd;User ID=user;Data Source=dianet;Persist Security Info=True";
   Конект.ConnectionString = СтрокаСоединения3;
       Попытка
       Конект.Open();
       //Сообщить("Подключились к шине!");
   Исключение
       Сообщить("Подключение к шине не удалось!");
       Возврат;
   КонецПопытки;
   Command =Новый  ComОбъект("ADODB.Command");
   Command.ActiveConnection= Конект;
   Command.CommandText ="select * from errors";
   
   RecordSet = Новый ComОбъект("ADODB.Recordset");
   Recordset.CursorLocation = 3;
   Recordset.Open("select * from errors",конект,2,3);
   RecordSet.AddNew();
   RecordSet.Fields("MSG").value="sd";
   RecordSet.Fields("NAME").value="name";
   RecordSet.Fields("DSC").value="not use";
   RecordSet.Fields("ETABLE").value="N";
   RecordSet.Fields("LOG").value="Y";
   RecordSet.Update();
   Сообщить(RecordSet.Fields("id").Value);
   Recordset.Close();
   RecordSet="";
   Конект.Close();

(21) ОК,
хорошо что MS не жадничает и выкладывает в MSDN баги по продуктам конкурента

Всё работает, но мой план в (3) не сработал ((( id возвращает Null

(23) А с чего бы он должен был вернуться?

(23) http://www.sql.ru/faq/faq_topic.aspx?fid=214
Q8

Q8: Как получить значение счетчика только что добавленной записи?

A1: Если запись добавляется через рекордсет, то так:

rs.AddNew
переменная = rs!полесчетчика
...
rs.Update

'или

Set rs = ...OpenRecordset("...where 1=0") 'обязательно пустой рекордсет
rs.AddNew 'ровно один раз; при добавлении двух и более записей ничего не получится
...
rs.Update
rs.MoveFirst
переменная = rs!полесчетчика

'или

rs.AddNew
...
rs.Update
rs.Bookmark = rs.LastModified
переменная = rs!полесчетчика


A2: Более широкий круг применимости у такого способа:

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
CurrentProject.Connection.Execute "INSERT ..."
rs.Open "SELECT @@identity as cou", CurrentProject.Connection
переменная = rs!cou
rs.Close

(24) да видимо его надо генерировать какой то функцией или методом...курю...

(25) +1
фаг конечно по Access
но возможно годиться и для Oracle

вот что нашел в документации по ADODB
Когда вы заносите в таблицу запись, то необходимо создать уникальный ID записи. Существует 2 общих способа: 1) auto-increment колонки, 2) последовательности.
Auto-increment колонки поддерживаются MySQL, Sybase и Microsoft Access и SQL Server. Однако большинство других баз не поддерживают такую возможность. Отсюда видно, что для создания переносимого кода у вас не такой большой выбор, а именно – использовать последовательности. Последовательности – это специальные функции, которые возвращают уникальное число каждый раз, когда вы к ним обращаетесь. Эти числа вполне подходят для использования в качестве уникальных ключей. В ADODB мы используем функцию GenId(). В качестве параметра она принимает название последовательности. Различные таблицы могут иметь разные последовательности.
http://php.russofile.ru/ru/translate/sql/adodb03/#0102

(28) GenId()- это php функция

(29) да

тему закрываю дальше с id сам разберусь.  shuhard - СПАСИБО за помошь!

(30) попробуй записать что-нибудь в id, вдруг у него есть триггер