[FORM] tc'ye göre veya ad soyada göre veri çekme
#1
ARKADAŞLAR KOLAY GELSİN. EKTEKİ DOSYADAKİ TABLO1 DEKİ ALANLARDAN KARAR TARİHİ ALANINA TEDBİR SÜRESİ ALANINDAKİ GÜN SAYISINI EKLEYEREK KARAR BİTİŞ TARİHİ ALANINA BİTİŞ TARİHİ EKLENSİN. AYRICA DURUM ALANINA KARAR BİTİŞ TARİHİ BUGÜN VEYA BUGÜN TARİHİ GELMEMİŞ İSE GÜNCEL, BUGÜN TARİHİ GEÇMİŞ İSE SÜRE BİTTİ YAZSIN.

BİR DE FORMDA TC VEYA AD SOYAD YAZILINCA O KİŞİLERLE İLGİLİ NE KADAR KAYIT VARSA GELSİN. YARDIMCI OLURSANIZ SEVİNİRİM.


Eklenti Dosyaları
.rar   Database51.rar (Boyut: 23,17 KB / İndirilme: 82)



  Alıntı
Bu mesajı beğenenler:
#2
Sn ozer71;
1. TEDBİR SÜRESİ ALANINDAKİ GÜN SAYISINI EKLEYEREK KARAR BİTİŞ TARİHİ ALANINA BİTİŞ TARİHİ EKLENSİN.
Alt formda
Visual Basic
  1. Private Sub TEDBİR_SÜRESİ_AfterUpdate()
  2. Me.KARAR_BİTİŞ_TARİHİ = DateAdd("d", Me.TEDBİR_SÜRESİ, Me.MAHKEME_KARAR_TARİHİ)
  3. End Sub



2. DURUM ALANINA KARAR BİTİŞ TARİHİ BUGÜN VEYA BUGÜN TARİHİ GELMEMİŞ İSE GÜNCEL, BUGÜN TARİHİ GEÇMİŞ İSE SÜRE BİTTİ YAZSIN.
Ana form gecerlı oldugu olay yordamına
Visual Basic
  1. Private Sub Form_Load()
  2. Dim Kyt As Recordset
  3. Set Kyt = Me.RecordsetClone
  4. Do Until Kyt.EOF
  5. If Not IsNull(Kyt![KARAR_BİTİŞ_TARİHİ]) Then
  6. Kyt.Edit
  7. Kyt!DURUMU = IIf(Kyt![KARAR_BİTİŞ_TARİHİ] <= Date, "GÜNCEL", "BİTTİ")
  8. Kyt.Update
  9. End If
  10. Kyt.MoveNext
  11. Loop
  12. Kyt.Close: Set Kyt = Nothing
  13. End Sub




3. TC VEYA AD SOYAD YAZILINCA O KİŞİLERLE İLGİLİ NE KADAR KAYIT VARSA GELSİN.
Aa forma ARAMA metin kutusu olusturun.
Visual Basic
  1. Privare sub ARAMA_Afterupdate()
  2. Me.filter=iif(isnumeric(Mid(me.ARAMA,1,1)),"[MAĞDUR TC]","[MAĞDUR ADI]") & " Like '* " & me.ARAMA & "*'"
  3. me.filteron=true
  4. end sub


ile yapilabilir



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] GİRİLEN GÜN SAYISINA GÖRE TARİH EKLEME SOGUT01 9 1.545 35 dakika önce
Son Mesaj: ioriret
  [FORM] Sayı değerine göre habatay 13 1.781 47 dakika önce
Son Mesaj: ioriret
  Tarih kısmını ilgili kolonlara göre ayırmak iisahin 5 5.641 1 saat önce
Son Mesaj: ioriret
  farklı tarihlerde girilen aynı değerleri toplama veya çıkarma baskanmmc 5 2.737 2 saat önce
Son Mesaj: ioriret
  [FORM] Listbox'da Satır Genişlemesi Veya Büyümesi M_Kemal_Askeri 3 393 4 saat önce
Son Mesaj: ioriret
  [RAPOR] Raporda Kolon Gizleme Veya Sorgudan Excel' E Aktarırken Boş Kolonları Aktarmasın Samih KARSLI 2 64 15-03-2024, 15:39
Son Mesaj: Samih KARSLI
  [FORM] Aktif Saati Tablodaki Saat Arasına Göre Bulup Forma Yazdırma yahyamacit 5 105 14-03-2024, 11:07
Son Mesaj: yahyamacit
  [FORM] Butonlara Yetkiye Göre Aktif Pasif Olsun Ahmet51 5 142 15-01-2024, 15:49
Son Mesaj: Ahmet51

Foruma Git:


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