Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос про грид, рекордсет и т.п. / 4 сообщений из 4, страница 1 из 1
13.09.2005, 09:41:48
    #33265495
Kicel
Kicel
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про грид, рекордсет и т.п.
По совету местных опытных товарищей пробую следующее:

есть TrueDBGrid на форме и в качестве источника для него рекордсет с параметрами adOpenStatic, adLockBatchOptimistic и adUseClient. Форма имеет текстовые поля с данными шапки документа и грид с составом документа из отдельной таблицы. Есть кнопка с командой UpdateBatch и так далее...
Грид позволяет добавлять в него новые записи (myGrid.AllowAddNew = True).

Вопрос следующий:
как в новые записи рекордсета в поле, допустим,"внутренний номер документа" запомнить значение номера шапки документа?
Поле есть в рекордсете, но его нет в гриде.

Буду благодарен за любую информацию.

P.S.
При adLockOptimistic я знаю как: SELECT @@Identity ... и т.п.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.09.2005, 11:04:24
    #33265716
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про грид, рекордсет и т.п.
Ты про идентификатор записи? Он добавится сам при апдейте. Нет? Задавай вопрос более внятно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.09.2005, 12:50:26
    #33266109
Worobjoff
Worobjoff
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про грид, рекордсет и т.п.
Объявить рекордсет WithEvents
и написать обработчик его события
Код: plaintext
1.
2.
3.
4.
5.
Private Sub rs_RecordChangeComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal cRecords As Long, _
            ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
   If adReason = adRsnAddNew Then
       'Здесь работаем с вновь добавленной записью
   End If
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.09.2005, 16:24:32
    #33266878
Kicel
Kicel
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос про грид, рекордсет и т.п.
Спасибо! Вот именно это и помогло:


WorobjoffОбъявить рекордсет WithEvents
и написать обработчик его события
Код: plaintext
1.
2.
3.
4.
5.
Private Sub rs_RecordChangeComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal cRecords As Long, _
            ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
   If adReason = adRsnAddNew Then
       'Здесь работаем с вновь добавленной записью
   End If
End Sub

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

To Antonariy :

Таблица "состав документа" имеет поля: "rowid" - идентификатор, "no" - внутренний номер документа, ну и еще куча полей.
С идентификатором проблем нет, но он и не нужен мне в этом случае. Поле "no" служит для связи с таблицей "шапка документа".
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос про грид, рекордсет и т.п. / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 757ms
Закрыть
start [/forum/search_topic.php?author=__Viktor_&author_mode=last_posts&do_search=1]:
 0ms
get settings:
 6ms
get forum list:
 15ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 36ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 33ms
get tp. blocked users:
 1ms
others: 629ms
total:  757ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]