Skip to main content

AccessTr.neT


Kayıt İçin Otomatik Günlük Sıra Numarası Vermek

M_Kemal_Askeri
M_Kemal_Askeri
6
423

Kayıt İçin Otomatik Günlük Sıra Numarası Vermek

#4
aşağıdaki kodu dener misiniz?
If Nz(Me.KayitNu, "") = "" Then
xHrf = Format(Date, "dd.mm.yyyy") & "-Y-"
If Sec = 2 Then xHrf = Format(Date, "dd.mm.yyyy") & "-P-"
xNud = DMax("clng(0 & mid([KayitNu],14))", "Tbl_AracKayit", "[KayitNu] like '" & xHrf & "*'")
Me.KayitNu = xHrf & Format(Nz(xNud, 0) + 1, "0000")
End If
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
RE: Kayıt İçin Otomatik Günlük Sıra Numarası Vermek - Yazar: berduş - 13/06/2022, 22:59
Task