Merhaba Adnan Bey,

Listesi temizlenmiş ilgili örnek ektedir. Şu işlemi yapmanızı rica ediyorum. A ürünü için iki farklı tarihte "beklemede" opsiyonunu seçin, devamında üçüncü tarihte "satıldı" opsiyonunu işaretleyin. Bunu yaptığınızda kayıtlar gayet güzel kilitleniyor.

Sonra B ürünü için aynı işlemi yapın. B için de kayıtların kilitlendiğini göreceksiniz. Bu işlemden sonra tekrar A kaydına dönün ve farklı bir tarihte satıldı-kaçtı ya da beklemede opsiyonlarından birini girmeyi deneyin. Göreceksiniz ki girilebiliyor. Halbuki girilememesi gerekiyor. Tüm meselem budur..

Sayın Fatih ben bu şekilde denememiştim tek kayıt üzerinden gitmiştim
işlem kodunu silerek aşağıdaki kodu ekleyin kolay gelsin


Public Sub islem()
Dim sat As Integer
Dim kac As Integer

sat = DCount("SATILDI", "DURUM", "SATILDI=true And kimlik=" & Me.Kimlik)
kac = DCount("KAÇTI", "DURUM", "KAÇTI=true And kimlik=" & Me.Kimlik)


If sat > 0 Or kac > 0 Then
DURUM.Enabled = False
Else
DURUM.Enabled = True
End If

End Sub