VPF::Error - Форум программистов

Flotskiy

Дата 9.7.2006, 16:20 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 223
Регистрация: 15.11.2004
Где: г. Омск

Репутация: 1
Всего: 2

Добрый день всем!
Написал программу на VB6 ( BD Access 97) "Приемная комиссия" для своей академии.
Работает уже 4 года без проблем. Училище (нашего профиля) попросило такую же и им. Я академскую переделал под их параметры и при вводе новой записи при сохранении выдает:

Код


Rum-time error '3426'
This action was cancelled by an associated  object

и прога вылетает

Если перед кодом поставить:

Код


   Case cmdSave         '-- save the current record
   On Error Resume Next

то выдает данную ошибку, но при нажатии повторно "записать" -сохраняет без проблем. Уже с неденлю роюсь, не могу ничего придумать.
Может кто что подскажет? Код не могу показать, очень запутан.
С уважением

--------------------

FlotskiySk k

Akina

Дата 10.7.2006, 00:34 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

По приведенному описанию единственное что тебе можно подсказать - распутай код.

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

Flotskiy

Дата 10.7.2006, 14:27 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 223
Регистрация: 15.11.2004
Где: г. Омск

Репутация: 1
Всего: 2

Akina, благодарю. Распутываю. Но когда выдает "3426", при каких заморочках?

--------------------

FlotskiySk k

Akina

Дата 10.7.2006, 17:06 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

Цитата

SYMPTOMS
This article discusses the error message "This action was cancelled by an associated object." that Visual Basic generates when working with Access databases and the Data control. This article does not apply to the ADO data control.

CAUSE
This error is being generated because the AddNew command of a bound recordset causes Visual Basic to try to save the current record if the data has changed. Because the data control is currently pointing to a NULL record and not an empty record, the data cannot be saved so the "action was cancelled by an associated object" error is reported. This is commonly seen when using the data form wizard in Visual Basic versions 4.0 and 5.0. The data form wizard in Visual Basic 6.0 generates code for the ADO data control so this error is less likely to occur.

RESOLUTION
Check the underlying recordset to see if either the BOF or EOF properties are True before allowing an implicit save to occur. An implicit save occurs either when using the data control to navigate off of a record where the information has changed or adding a record to a bound recordset.

Цитата

SYMPTOMS
When the ListField property is not set on a bound DBCombo box, one of the following errors can occur when you try to Update the Recordset.

Runtime error '3426':
This action was cancelled by an associated object.
-or-
Run-time error '3315':
Field 'Tablename.Field' can't be zero-length string.

CAUSE
The new value is not being saved to the BoundText property of the DBCombo box. If you check the BoundText property (e.g. Msgbox DBCombo1.BoundText), it will be blank.

RESOLUTION
If you set the ListField property, the BoundText property will retain the data.

The RowSource property in the On Line Help states the following:

"To fill the list in a DBCombo or DBList control, you must specify a

Data control in the RowSource property at design time using the Properties window.

To complete the connection with a field in the Recordset object managed by the Data control, you must also provide the name of a Field object in the ListField property."

--------------------

mihanik

Дата 11.7.2006, 16:08 (ссылка)

(нет голосов)

Загрузка ...

-=Белый Медведь=-

Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 11
Всего: 109

Думаю, что скорее всего Field 'Tablename.Field' can't be zero-length string. .

Было у меня однажды такое...

Хотя... Если ты говоришь "3426"...
Посмотри внимательно все свойства полей таблицы.
Пляши оттуда.
Может индексы где-то есть.
Может, уникальные индексы...

Это сообщение отредактировал(а) mihanik - 11.7.2006, 16:10

--------------------

Программистами не рождаются, - это родовая травма...

Flotskiy

Дата 12.7.2006, 06:34 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 223
Регистрация: 15.11.2004
Где: г. Омск

Репутация: 1
Всего: 2

Благодарю всех. Если найду эту неисправность - поделюсь.
Всего доброго.

--------------------

FlotskiySk k

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »