Не работает CancelUpdate в DataGrid

@Arthur_K · Регистрация: 27.07.2009

Author24 — интернет-сервис помощи студентам

Проблема: не могу отменить изменения, не работает CancelUpdate
В форуме была такая тема, где предлагается использовать
adLockBatchOptimistic и CancelBatch, однако, при использовании batch mode, вообще нет вызова события AfterUpdate

Открываю коннекцию с провайдером 'SQLOLEDB'

strSQL = 'Select firm_name, accLogin, accPasswd from dbo.client_account order by firm_name'
rs.Open strSQL, mConn,adUseClient,adOpenDynamic,adLockOptimistic
'---------------------------------
Private Sub DataGrid1_AfterUpdate()
If MsgBox('Внести изменения?', vbYesNo, 'Update record') = vbYes Then
rs.Update
Else
rs.CancelUpdate
End If
End Sub

@Sergey_Kov · 29.07.2009, 14:54

DataGrid1_AfterUpdate - после внесения изменений, а не до...

@Arthur_K · 29.07.2009, 15:12 **[ТС]**

Пардон, конечно, Before - но ситуация такая же

29.07.2009, 15:31

Батч на то и батч, чтобы пакетно обновлять.
А AfterUpdate работает после редактирования одной строки!
Так что тут все законно.

29.07.2009, 15:31

В смысле Before...

@Arthur_K · 30.07.2009, 11:40 **[ТС]**

Да вот в том то и дело, что не работает CancelUpdate.
Не хочет он восстанавливать прежние значения столбцов строки

@Konst_one · 30.07.2009, 12:51

Используй adLockBatchOptimistic

@Arthur_K · 30.07.2009, 13:05 **[ТС]**

При использовании adLockBatchOptimistic нет выхода на событие AfterUpdate/BeforeUpdate, т.е. при (после) изменении строки в DataGride не генерируется событие AfterUpdate/BeforeUpdate

@Konst_one · 30.07.2009, 16:30

Зато можно отменить все изменения в гриде сразу с помощью CancelUpdate

@Arthur_K 0 / 0 / 0 Регистрация: 27.07.2009 Сообщений: 4
		1
	Не работает CancelUpdate в DataGrid 27.07.2009, 11:10. Показов 1146. Ответов 8 Метки нет (Все метки) Проблема: не могу отменить изменения, не работает CancelUpdate В форуме была такая тема, где предлагается использовать adLockBatchOptimistic и CancelBatch, однако, при использовании batch mode, вообще нет вызова события AfterUpdate Открываю коннекцию с провайдером 'SQLOLEDB' strSQL = 'Select firm_name, accLogin, accPasswd from dbo.client_account order by firm_name' rs.Open strSQL, mConn,adUseClient,adOpenDynamic,adLockOptimistic '--------------------------------- Private Sub DataGrid1_AfterUpdate() If MsgBox('Внести изменения?', vbYesNo, 'Update record') = vbYes Then rs.Update Else rs.CancelUpdate End If End Sub 0

@Sergey_Kov 0 / 0 / 0 Регистрация: 29.03.2009 Сообщений: 56
	29.07.2009, 14:54	2
	DataGrid1_AfterUpdate - после внесения изменений, а не до... 0

@Arthur_K 0 / 0 / 0 Регистрация: 27.07.2009 Сообщений: 4
	29.07.2009, 15:12 [ТС]	3
	Пардон, конечно, Before - но ситуация такая же 0

Newbie
	29.07.2009, 15:31	4
	Батч на то и батч, чтобы пакетно обновлять. А AfterUpdate работает после редактирования одной строки! Так что тут все законно.

@Arthur_K 0 / 0 / 0 Регистрация: 27.07.2009 Сообщений: 4
	30.07.2009, 11:40 [ТС]	6
	Да вот в том то и дело, что не работает CancelUpdate. Не хочет он восстанавливать прежние значения столбцов строки 0

@Konst_one 2 / 2 / 1 Регистрация: 19.07.2007 Сообщений: 737
	30.07.2009, 12:51	7
	Используй adLockBatchOptimistic 0

@Arthur_K 0 / 0 / 0 Регистрация: 27.07.2009 Сообщений: 4
	30.07.2009, 13:05 [ТС]	8
	При использовании adLockBatchOptimistic нет выхода на событие AfterUpdate/BeforeUpdate, т.е. при (после) изменении строки в DataGride не генерируется событие AfterUpdate/BeforeUpdate 0

@Konst_one 2 / 2 / 1 Регистрация: 19.07.2007 Сообщений: 737
	30.07.2009, 16:30	9
	Зато можно отменить все изменения в гриде сразу с помощью CancelUpdate 0