A.S.C Filtre, Grafik ve Raporlama Eklentisi

[FORM] Sipariş Kodu Oluşturma
#1
kolay gelsin arkadaşlar, 
siparis_kodu_tablosu'ndaki siparis_kodu alanında ardışık olarak artan sipariş numarası oluşturuyorum.
SP-21-1
[Resim: attachment.php?aid=25104]
SP-22-10 dan sonra SP-22-11 olması gerekirken SP-22-10 da kaldı.

yardımcı olabilir misiniz?


Eklenti Dosyaları
.rar   siparis_kodu_tablosu.rar (Boyut: 22,47 KB / İndirilme: 14)
.jpg   sipkodu.jpg (Boyut: 16,39 KB / İndirilme: 45)



  Alıntı
Bu mesajı beğenenler:
#2
Visual Basic
  1. Option Compare Database
  2. Private Sub btn_kaydet_Click()
  3. CurrentDb.Execute "INSERT INTO siparis_kodu_tablosu (siparis_kodu) VALUES ('" & Me.sip_kodu & "')"
  4. End Sub
  5. Private Sub btn_sip_kodu_olustur_Click()
  6. Dim rs As New ADODB.Recordset
  7. rs.Open "SELECT Max(CLng(Mid([siparis_kodu],7))) AS EnSon FROM siparis_kodu_tablosu WHERE (((Mid([siparis_kodu],4,2))=Format(Date(),'yy')))", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
  8. If IsNull(rs!EnSon) Then Me.sip_kodu = "SP-" & Format(Date, "yy") & "-" & 1 Else Me.sip_kodu = "SP-" & Format(Date, "yy") & "-" & rs!EnSon + 1
  9. rs.Close: Set rs = Nothing
  10. End Sub



Form altında ki kodları değiştirin.



  Alıntı
Bu mesajı beğenenler:
#3
sn dsezgin üstadım, merhaba,
tabloda hiç veri yoksa ilk defa sipariş kodu verilmeye başlandıysa, 
SP-22-
gibi veriyor,



yada

SP-21-1
SP-21-2
SP-21-3
SP-21-4
2021 yılından sonra 2022 ye geçtiğimde

yine aynı
SP-22-
gibi numara veriyor,
SP-22-1 vermesi gerekiyor aslında



  Alıntı
Bu mesajı beğenenler:
#4
rs.recordcount=0 olanı IsNull(rs!EnSon) olarak değiştirin.



  Alıntı
Bu mesajı beğenenler:
#5
Çok teşekkür ederim,
Allah razı olsun,



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Altform Verisine Göre Grafik Oluşturma Hk YENIFENER 2 226 16-11-2022, 11:25
Son Mesaj: dsezgin
  Sorgu Oluşturma snapper 0 75 05-10-2022, 16:14
Son Mesaj: snapper
  [SORGU] Sözdizimi Hata Kodu Alıyorum golf2000 12 235 29-08-2022, 20:00
Son Mesaj: halily
  Dinamik Rapor Tasarımı Oluşturma Hk. adnnfrm 5 222 15-04-2022, 00:52
Son Mesaj: dsezgin
  [VBA] Veri Girişi Vba Kodu hedefkaya 2 102 26-03-2022, 22:19
Son Mesaj: hedefkaya
  [FORM] Klasör Oluşturma, Kopyalama, Yolu Ve Dosyayı Kaydetme Işl. Hak.. rerdem1903 1 152 05-02-2022, 00:41
Son Mesaj: dsezgin
  [TABLO] Hata Kodu 3822.eni Satir Kaydedilene Kadar Değer Bu Satıra Kaydedilemez rerdem1903 21 416 01-02-2022, 03:02
Son Mesaj: rerdem1903
  Sipariş Numarasına Göre Koli Numarası Verdirme husem 9 208 29-01-2022, 00:41
Son Mesaj: husem

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi