Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / 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):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 354ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2167200]:
 0ms
get settings:
 9ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 44ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 243ms
total:  354ms
x
x
Закрыть


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