[اسلام الكبابى]

حاولت محاولة أخرى وهى وضع متغير يدل على تنقل ال Adodc1 بين السجلات فوضعت متغيراسمهmovv وكتبت الكود

PHP كود :

Dim movv As Boolean

Private Sub Adodc1_WillMove(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
movv = True
End Sub

Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.ERROR, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
movv = False
  Adodc1.Caption = "Record: " & CStr(Adodc1.Recordset.AbsolutePosition)
End Sub

Private Sub txtFields_Change(Index As Integer)
  If movv = True Then GoTo 100
  cmdCancle.Visible = False
  CMDUpdate.Visible = False
100 End Sub 


كتبته ظنآ منى ان تسلسل الأحداث هوAdodc1_WillMove
ثم txtFields_Change
ثم Adodc1_MoveComplete
ولكن لم يفلح الكود لأن تسلسل الأحداث كان غير ذلك