Перейти к содержимому


Услуги программиста 1С
Профессиональные программисты 1С.
Весь комплекс услуг сопровождения 1С.

Курсы 1С
Бухгалтерам, менеджерам
и программистам.
Бесплатно!
Живое индивидуальное обучение по 1С.

1c + InterBase


  • Авторизуйтесь для ответа в теме
В этой теме нет ответов

#1   Banzaez

Banzaez

      Рядовой

    • Пользователи
    • Сообщений: 14
    • Регистрация: 09-September 10
    • Откуда:Киев , Киев , Украина

Отправлено 08 February 2011 - 17:00

Всем добрый вечер.
В общем делаю связь 1ски и бд Interbase.
Все вроде хорошо, но не хочет присваиваться значение((
Пишет "Текущий объект Recordset не поддерживает обновление. Это связано с ограничением поставщика или с выбранным типом блокировки".
Помогите хотя бы добрым словом)

Процедура Firebird_Connect()

Connection = СоздатьОбъект("ADODB.Connection");
// Установить соединение используя провайдер FreeIBProvider
ConnectionString="provider=LCPI.IBProvider.1;data source=127.0.0.1:" +выбИмяБазы+ ";user id=sysdba;password=masterkey;auto_commit=true";
//проверка соединения

try Connection.Open(ConnectionString);
Сообщить ("Соединение установлено");
except
Сообщить("Невозможно установить соединение" );
endtry;

RS = СоздатьОбъект("ADODB.Recordset");

//Запрос к базе данных на языке SQL запросов
RS.CursorType = 1;
RS.LockType = 3;
попытка
RS.Open("Select * From DEPO_MAN", Connection );
исключение
Сообщить ("Проблемы с выполнением запроса к InterBase");
Возврат;
КонецПопытки;

// Пример обработки полученного recordset

Пока RS.EOF() = 0 Цикл
Сообщить(RS.Fields("DEPO_FL_NAME").Value+" "+RS.Fields("DEPO_FL_FIRST_NAME").Value+" "+RS.Fields("DEPO_FL_SECOND_NAME").Value);

RS.Fields("STR_ADDR").Value = "";

RS.MoveNext();

КонецЦикла;

// Завершение работы с InterBase

RS.Close();
Connection.Close();

КонецПроцедуры

Добавлено (08.02.2011, 17:00)
---------------------------------------------
Пока ждал ответа разобрался))
Добавил вот это

RS.CursorLocation = 3;
RS.CursorType = 2;
RS.LockType = 3;

  • 0



Похожие темы

  Название темы Автор Статистика Последнее сообщение



Количество пользователей, читающих эту тему: 0

0 пользователей, 0 гостей, 0 анонимных