AccessTr.neT

Merhaba Arkaşlar
Ekte ki çalışmadaki model değişiklik formundaki Kod No bölümünde denetlemeye göre kayıt yaptırmak istiyorum fakat başaramadım.Aynı kod ürüne verildiğinde bu kod kullanıldı gibi mesaj la kayıt yapayımmı diye sorduramıyorum.Forumdaki bir örnekten yolacıktım fakat karıştırdım sanırım.ilginize şimdiden teşekkürler.

aşağıdaki kodu firstname(senin hesapnumarası değeri girdiğin alan) alanının güncelleştinme olayına yapıştır.

Private Sub FirstName_AfterUpdate()
Dim rst As DAO.Recordset

Set rst = CurrentDb.OpenRecordset("select * From model_cesıt where HesapNumarası='" & Me.HesapNumarası & "'")
If rst.RecordCount => 1 Then
MsgBox "girdiğiniz kod numarası daha önce girilmiş"
Me.FirstName.SetFocus
End If

End Sub

üzgünüm anlamadım sorunu
aynı kayıttan varsa uyarsın mı?
kayıt dediğin zaten kayıt olmuşları gösteriyor. ayrıca yeni kayıt mı eklenecek.
aynı yerde düzenleme yaparak kayıtlara mı atsın ?

if dcount(.....)>0 MsgBox "girdiğiniz kod numarası daha önce girilmiş"

daha hızlı,daha kolay olmaz mı?

hocam haklısın. aklıma ilk gelen yöntemi yazdım.

Sn Üstadlar kusura bakmazsanız ben bu işi tabloda yineleme yok ile çözüyorum. Yanlış mı yapıyorum? Bu şekilde uyarı kendisi veriyor. Saygılar...