AccessTr.neT
Mükerrer Kayıt Engelleme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Mükerrer Kayıt Engelleme (/konu-mukerrer-kayit-engelleme--90933.html)

Sayfalar: 1 2


RE: Mükerrer Kayıt Engelleme - te-kin - 28/02/2024

(28/02/2024, 16:31)atoykan yazdı: Sayın @simendifer 'in yaptığı çalışma zaten bunu sağlıyor. Barkod numarasını değiştirirseniz yeni kayıt yaparsınız, aynı barkod numarası ile mükerrer kayıt işlemi yapmıyor uygulama. Sorun nedir anlamış değilim.

Burada sadece barkod numarasını değil tarihi de kontrol etmesini istiyorum. örneğin 0712345678901 barkod no ile 28/02/2024 tarihinde giriş yapan kişi aynı gün tekrar giriş yapmasın ama bir sonraki gün giriş yapabilsin.


RE: Mükerrer Kayıt Engelleme - atoykan - 28/02/2024

M1 textboxının afterupdate olayını aşağıdaki gibi değiştirin
Private Sub M1_AfterUpdate()
If Dlookup ("BRKD", "KONTROL", "BRKD='" & M1 & "' And g_tarih=#" & Format(Date, "yyyy-mm-dd") & "#") = True Then
MsgBox "Bugün giriş yapmış durumdasınız", vbOKOnly, "GİRİŞ KAYDI MEVCUT"
End If

Dim vSearchString As String
vSearchString = Me.M1.Text
Me.M7.Value = vSearchString
Me.L2.Requery
Me.L2.Selected(0) = True
Me.L3.Requery
Me.L3.Selected(0) = True
End Sub



RE: Mükerrer Kayıt Engelleme - te-kin - 29/02/2024

teşekkür ederim istediğim gibi olmuş.


RE: Mükerrer Kayıt Engelleme - te-kin - 29/02/2024

sizden bir ricam daha var. çıkış tarihi ve saati için nasıl bir güncelleme kodu yazabiliriz.


RE: Mükerrer Kayıt Engelleme - atoykan - 29/02/2024

Aynı mantıkla yazın


RE: Mükerrer Kayıt Engelleme - te-kin - 29/02/2024

.AddNew yerine .edit komutu ile mi başlamam gerekiyor.