ADODB проблема обновления поля в таблице / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADODB проблема обновления поля в таблице

8 сообщений из 8, страница 1 из 1

ADODB проблема обновления поля в таблице

#34404690

Pr0teus

Гость

Работаю с базой DBC через ADODB. В коде программы произвожу последовательные обновления таблиц (см. код). По неизвестным причинам, когда дело доходит до третьей таблицы 46 записи нижеприведенный SELECT выдает ошибку [Microsoft][ODBC Visual FoxPro Driver]Record is not locked, причем выдает он ее только, если база находиться на сетевом диске, если на локальном, то все проходит нормально 8(

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.

If (objRecordSet.State = adStateOpen) Then objRecordSet.Close
objRecordSet.Open "SELECT * FROM table3 WHERE mainid=" & nMAINID & " .AND. recid=" & nRECID, objDBCConnection, adOpenStatic, adLockOptimistic

If (Err <>  0 ) Then
   ' Ошибка 
   flagWasError = True
   Err.Clear
Else

   ' какой-то код...

   ' обновление полей
   objRecordSet.fields(strFldName).Value = XMLAttribute.Value
   objRecordSet.Update

   ' какой-то код...

End If

...

Рейтинг:

0 / 0

21.03.2007, 09:27

| Ответить | Цитировать | Написать

ADODB проблема обновления поля в таблице

#34404730

Pr0teus

Гость

Оказалось, что ошибка взводиться после выполнения

Код: plaintext

1.
2.

If (objRecordSet.State = adStateOpen) Then objRecordSet.Close

Но почему???

...

Рейтинг:

0 / 0

21.03.2007, 09:40

| Ответить | Цитировать | Написать

ADODB проблема обновления поля в таблице

#34404919

Melkiades

Участник

Откуда: Москва

Сообщения: 1 459

Рейтинг: 0 / 0

Pr0teusОказалось, что ошибка взводиться после выполнения

Код: plaintext

1.
2.

If (objRecordSet.State = adStateOpen) Then objRecordSet.Close

Но почему???
Потому что если рекордсет уже открыт, его нельзя открыть еще раз.

...

Рейтинг:

0 / 0

21.03.2007, 10:31

| Ответить | Цитировать | Написать

ADODB проблема обновления поля в таблице

#34404970

Pr0teus

Гость

Да это понятно, не зря же я проверял. Тут не известно в чем проблема. Трассировка ничего не показывает. Не могу обновить данные и все 8( Может из-за того, что все происходит в одной большой транзакции. Еще раз повторяюсь, что ошибка выскакиевает только если работа идет с базой расположенной на сетевом диске, если на локальном, то все ок (потому и проглядел ее)

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.

If (objRecordSet.State = adStateOpen) Then objRecordSet.Close

'...

' а эта хрень выдает ошибку Record is not locked, хотя выборка проходит
objRecordSet.fields(strFldName).Value = XMLAttribute.Value
objRecordSet.Update

Думается во всем Novell виноват (((

...

Рейтинг:

0 / 0

21.03.2007, 10:44

| Ответить | Цитировать | Написать

ADODB проблема обновления поля в таблице

#34410418

Программист Дёня

Участник

Откуда: Невиннка

Сообщения: 161

Рейтинг: 0 / 0

Pr0teusДа это понятно, не зря же я проверял. Тут не известно в чем проблема. Трассировка ничего не показывает. Не могу обновить данные и все 8( Может из-за того, что все происходит в одной большой транзакции. Еще раз повторяюсь, что ошибка выскакиевает только если работа идет с базой расположенной на сетевом диске, если на локальном, то все ок (потому и проглядел ее)

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.

If (objRecordSet.State = adStateOpen) Then objRecordSet.Close

'...

' а эта хрень выдает ошибку Record is not locked, хотя выборка проходит
objRecordSet.fields(strFldName).Value = XMLAttribute.Value
objRecordSet.Update

Думается во всем Novell виноват (((

может так проверять

Код: plaintext

If not (objRecordSet is Nothing) Then objRecordSet.Close

...

Рейтинг:

0 / 0

23.03.2007, 09:16

| Ответить | Цитировать | Написать

ADODB проблема обновления поля в таблице

#34410424

Программист Дёня

Участник

Откуда: Невиннка

Сообщения: 161

Рейтинг: 0 / 0

Программист Дёня Pr0teusДа это понятно, не зря же я проверял. Тут не известно в чем проблема. Трассировка ничего не показывает. Не могу обновить данные и все 8( Может из-за того, что все происходит в одной большой транзакции. Еще раз повторяюсь, что ошибка выскакиевает только если работа идет с базой расположенной на сетевом диске, если на локальном, то все ок (потому и проглядел ее)

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.

If (objRecordSet.State = adStateOpen) Then objRecordSet.Close

'...

' а эта хрень выдает ошибку Record is not locked, хотя выборка проходит
objRecordSet.fields(strFldName).Value = XMLAttribute.Value
objRecordSet.Update

Думается во всем Novell виноват (((

а лучше так

Код: plaintext

1.
2.
3.

If not (objRecordSet is Nothing) Then
  objRecordSet.Close
  set objRecordSet=nothing

...

Рейтинг:

0 / 0

23.03.2007, 09:19

| Ответить | Цитировать | Написать

ADODB проблема обновления поля в таблице

#34411907

Magnus23

Участник

Сообщения: 9 288

Рейтинг: 0 / 0

Программист Дёня

Код: plaintext

If not (objRecordSet is Nothing) Then objRecordSet.Close

...

Рейтинг:

0 / 0

23.03.2007, 15:06

| Ответить | Цитировать | Написать

ADODB проблема обновления поля в таблице

#34411955

Программист Дёня

Участник

Откуда: Невиннка

Сообщения: 161

Рейтинг: 0 / 0

Magnus23 Программист Дёня

Код: plaintext

If not (objRecordSet is Nothing) Then objRecordSet.Close

Не угадывайте. Дело не в отсутствии рекордсета. И если уж проверять то на State в любом случае нужно, перед вызовом Close.

2 Pr0teus
Если проблема с сетевой базой, попробуй таймаут изменить. Поставь анлимитед например.
connection.ConnectionTimeout=0

ну, не знаю, тока с бд работал через Connection и Recordset, если рекорд соединят с бд, то при разрыве вылетает всё

...

Рейтинг:

0 / 0

23.03.2007, 15:17

| Ответить | Цитировать | Написать

8 сообщений из 8, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADODB проблема обновления поля в таблице

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&msg=34404730&tid=2164317]:	0ms
get settings:	6ms
get forum list:	14ms
check forum access:	2ms
check topic access:	2ms
track hit:	136ms
get topic data:	7ms
get forum data:	2ms
get page messages:	35ms
get tp. blocked users:	1ms
others:	200ms

total:	405ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы