merhaba,
eklemiş olduğum örnekte, YENİ KAYIT butonuna tıkladığımda
tablodaki sipariş numarasından 1 fazlasını vermesini istiyorum.
sipariş numarasını verirken
21-1
21-2
21-3
21-4 gibi verdiriyorum.
21=2121 yılı
2022 yılına geçtiğimde 22-1
22-2
22-3.... gibi verecek
Dim rs As New ADODB.Recordset
rs.Open "SELECT Last(Mid([SIPARIS_NO],4)) AS SIPNO FROM SIP_KAYIT", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If Not rs.EOF Then
Me.SIPARIS_NO = Format(Date, "yy") & "-" & rs("SIPNO") + 1
Else
End If
rs.Close
bu şekilde çözdüm,
çözümü paylaştığınız için teşekkürler
iyi çalışmalar
merhaba arkadaşlar.
21 = 2021 yılı
Sipariş numarası verirken 21-12, 21-13, 21-14..... gibi sipariş numarası veriyor.
yıl 2022 ye geçtiğinde tablodan nasıl bir sorgulatma yaparak 22-1 diye başlatabilirim.
otomatik program 22-1 diye başlasın istiyorum,
X=Dcount("*","tabloadi","left([sipariş no alani],2=22)")
Benzeri bir kod işe yarayabilir
Belki koşullu dmax ile değer bulunup +1 yapılabilir henüz denemedim
merhaba sayın üstadım,
sizin mesajınızdan sonra aklıma geldi.
yeni kayıt butonuna tıklandığnıda
21-50 gibi birnumara verir bu arada mevcut tarih te 2022 olduğundan 21-50 ile 2022 uyuşmayacağından, yıl+1 yaptırılabilir diye düşündüm. yeni numara da 22-1 olur,
teşekkürler,
kolay gelsin