AccessTr.neT

Merhaba arkadaşlar;

Ekteki veritabanımda; isim bazında mükerrer fatura girişlerini önlemeyi amaçlıyorum.

Tablo özelliklerinde  "yineleme yok" seçeneğiyle kriter olmaksızın mükerrer kayıt girişini önlemek mümkün fakat tablo düzenini değiştirmeksizin (yani alt tablo eklemeksizin) başka bir kritere bağlı olarak mükerrer kaydı önleyebiliyor muyuz?

Örnekle anlatacak olursam;
Tablomdaki kayıtlarda:

İsim: Ceren Faturano:12345
İsim: Ahmet Faturano:12345
                                              kayıtları bulunmakta.

Yeni bir kayıt girişinde; "Mehmet" ismiyle "12345" fatura numarasının girişine izin verilmesini istiyorum fakat Ahmet ismiyle "12345" fatura numarasının bir daha girişini engellemek istiyorum.
Yani, farklı isimlerde aynı faturanın girilmesine izin verirken, isim bazında mükerrer kayıt girilmesini engellemek istiyorum.

Bu mümkün müdür?

Yardımlarınız için şimdiden teşekkür ederim.

tofatura_isim açılan kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu yazarak deneyiniz.

Dim AccessTrneT_Kontrol As Integer



AccessTrneT_Kontrol = DCount("tofatura_no", "toplafaturalarust", "[tofatura_isim] ='" & [tofatura_isim] & "'  And [tofatura_fat2no]= '" & [tofatura_fat2no] & "'")



If AccessTrneT_Kontrol > 0 Then



    MsgBox ("bu kayıt girilemez")

    tofatura_isim = ""

    Exit Sub



End If

Çok teşekkürler Ozan bey. Sorun çözüldü.