A.S.C Filtre, Grafik ve Raporlama Eklentisi

[FONKSiYON] Kayıt Sayısı Atama Yeniden Değer verme ve Sıralama
#1
Ekteki vt de yaşlılarımızın kayıtları tutulmaktadır.Örnekte 9 kayıt var.Bu kayıtlardan 1-5 kadar olanı kabulü yapılmış yaşlı.6-9 kadar olanıda Misafir yaşlı Misafir yaşlıların Kütük No alanına kayıt yapılırken 0 değeri atanmaktadır. Daha sonra da kabülü yapılıncada SNO değerinin değeri ile eşitlenmektedir. Örneğin 9. kayıttaki kişinin kabulü yapılınca bu kaydı kabulü yapılı olan 5. kaydın arkasına taşıyan ve SNO- 6, KÜTÜK NO- 6 değeri verdirip takip eden misafir kayıtlarınada 7-8-9 olarak yeniden değer verip sıralayan bir koda ihtiyaç duyulmaktadır. Access ile bayağı haşır neşir birisi olmama rağmen bu konu beni aşmaktadır.Saygı değer Üstadlarımdan bu konuda yardım bekliyorum.

Teşekkür ederim


.rar   YAŞLI-ENGELLİ UYGULAMA.rar (Boyut: 455,87 KB / İndirilme: 14)



  Alıntı
Bu mesajı beğenenler:
#2
Visual Basic
  1. Private Sub MSF_afterupdate()
  2. Me.KUTUKNO = IIf(Me.MSF = True, DMax("KUTUK_NO", "Yaşlı") + 1, 0)
  3. End Sub



Kaydet butonu ile kayit yapilabilir. VBA ile proje acilamiyor.



  Alıntı
Bu mesajı beğenenler:
#3
(10-09-2019, 15:20)dsezgin demiş ki:
Visual Basic
  1. Private Sub MSF_afterupdate()
  2. Me.KUTUKNO = IIf(Me.MSF = True, DMax("KUTUK_NO", "Yaşlı") + 1, 0)
  3. End Sub



Kaydet butonu ile kayit yapilabilir. VBA ile proje acilamiyor.

Sezgin Hocam Teşekkür ederim.
Verdiğin kodu bir butonun Tıklandığı olayına yazdım, KUTUKNO  alanını dediğiniz gibi son kayda alıyor. Fakat ben Hem kütükno alanını hemde SNO alanını aynı değere eiştlemesini diğer Misafir kayıtlarınıda tekrar yeni duruma göre SNO alanı sayılarınıda güncellemesini istemiştim.

Projede bir sorun yok açılıyor (Office 2013)



  Alıntı
Bu mesajı beğenenler:
#4
neden hem "kütükno" hem de "Sno" var  ikisi de aynı ise ikisinden biri silinebilir?
misafirse açılır kutuya "odano" tablosunu bağlamama rağmen odano seçilemiyor odano seçilmeden de kayıt yapılamıyor.



  Alıntı
Bu mesajı beğenenler:
#5
(11-09-2019, 12:10)halily demiş ki: neden hem "kütükno" hem de "Sno" var  ikisi de aynı ise ikisinden biri silinebilir?
misafirse açılır kutuya "odano" tablosunu bağlamama rağmen odano seçilemiyor odano seçilmeden de kayıt yapılamıyor.

Üstadım  SNO yu İd gibi düşünün
BLOK alanına(MİSAFİR) tekrar tıklamanız gerekiyor "ili seçilince ilçeyi getiren kod gibi düşünün"



  Alıntı
Bu mesajı beğenenler:
#6
(11-09-2019, 15:48)Ahmet51 demiş ki:
(11-09-2019, 12:10)halily demiş ki: neden hem "kütükno" hem de "Sno" var  ikisi de aynı ise ikisinden biri silinebilir?
misafirse açılır kutuya "odano" tablosunu bağlamama rağmen odano seçilemiyor odano seçilmeden de kayıt yapılamıyor.

Üstadım  SNO yu İd gibi düşünün
BLOK alanına(MİSAFİR) tekrar tıklamanız gerekiyor "ili seçilince ilçeyi getiren kod gibi düşünün"

Kendimce birşeyler yapmaya çalıştım. Pekte içime sinmedi(Buton kullanmadan otomatik olmasını istiyordum."Misafir Kesin Kabul") ama siz üstadların fikrine sunuyorum. Vt ekdedir.


.rar   YAŞLI-ENGELLİ UYGULAMA.rar (Boyut: 499,33 KB / İndirilme: 13)

Birde "ÇIKIŞ" butonuna tıklandığı olayında kayıtlardan herhangi biri boşsa yada tamamı boşsa çıkan mesajda evete basılınca form kapanıyor. Oysa Hayır' a basılınca Form kapanmalı Evet'e basınca form boşsa kapanmamalı.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Sorguda Form Liste kutusundan değer almak Enigmatic 9 7.428 14-02-2020, 15:46
Son Mesaj: mkmugla
  [VBA] Sql Sorguya Sıralama Kodunu Ekleme toprak2349 1 32 14-02-2020, 12:12
Son Mesaj: onur_can
  [VBA] Liste Den Kayıt Seçme Ve Yazdırma Yada Listeden Kayıt Seçim Buton Ile Yazdırma Ahmet51 6 91 10-02-2020, 16:24
Son Mesaj: Ahmet51
access-sql-4 Form Içinde Kullanılmak üzere Değer Atama alperalper 3 69 29-01-2020, 23:32
Son Mesaj: dsezgin
access-sql-18 [VBA] Kayıt Butonuna Tıklamadan Kayıt Etme Sorunu mkmugla 2 78 20-01-2020, 08:27
Son Mesaj: mkmugla
  Filtreleme Ve özel Sıralama İsmail coşan 10 244 15-01-2020, 20:59
Son Mesaj: İsmail coşan
access-sql-18 [FORM] Boş Olan Klasör Sayısını Otomatik Verme Sorunu prestij06 2 65 13-01-2020, 14:34
Son Mesaj: prestij06
  [SORGU] Açılan Kutudaki Değer Listesi (değer Listesi Tablo Veya Sorguya Dayanmıyor) Ahmet51 9 352 10-12-2019, 15:31
Son Mesaj: Ahmet51

Foruma Git:


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