Apartman / Site Yönetim Programı(Metinse)
#19
cmdCalDate dugmesi tiklama olay yordaminda ki =CalendarFor([Donem];"Alma Tarihi") deyimindeki koyu olan yeri degistirebilirsiniz.



  Alıntı
Bu mesajı beğenenler:
#20
değiştirdim dediğiniz yeri sanırım toplu ödeme yapılmıyo gibi



  Alıntı
Bu mesajı beğenenler:
#21
(25-03-2018, 00:58)zambak demiş ki: değiştirdim dediğiniz yeri sanırım toplu ödeme yapılmıyo gibi
Toplu odeme yapilmasi saglayan bir islem degil, Donem kutusunun saginda bulunan takvim icindi. Konuya eklediginiz uygulama T030_BankalarIslem tablosuna kayit ekliyor.
Sizin sayenizde incelemeye calistigim uygulama, toplu borclandirma ile T020_UyeBorc tablosuna kayit eklenmis kayitlara, T030_BankalarIslem tablosuna kayit eklenebiliyor. Borc tablosunda kayit yok ise eklenen yeni dugmede islem yapmaz. Hazir uygulamalar benzer durumdan dolayi sizin acinizdan sorunlu cikabilir. Kendi hazirlayacaginiz bir proje daha kontrollu ve amaciniza uygun olabilir.

NOT : Makro veya kodlarin calismasi icin baslangicta uyari ekrani geliyorsa evet demelisiniz. Bu uyari eylemini bir daha gormek istemiyorsaniz, Guvenlik ayarlarini en dusuk seviyeye ayarlamalisiniz.



  Alıntı
Bu mesajı beğenenler:
#22
dzegin merhabalar sizin yazmış olduğnuz kodu çalıştırdım ama buna ek ölçüt kısmına bir parametre daha ekledim ama çalıştıramıyorum kodu aşağı ekliyorum rica etsem inceleyebilirmisiniz.


Visual Basic
  1. CurrentDb.Execute "INSERT INTO T030_BankalarIslem ( Tarih, Islem, GelUyeNo, Tutar, Aciklama ) " & _
  2. "SELECT T020_UyeBorc.Donem, '" & Me.Frm_BorcTuruSecim.Column(0) & "' AS E1, T020_UyeBorc.GelUyeNo, T020_UyeBorc.Tutar, UCase(format(T020_UyeBorc.Donem,'mmmm - yyyy')) & ' Dönemi ' & dlookup('AdSoyad','S026_GELIR_UYE_SECIM','clng(GelUyeNo)=' & T020_UyeBorc.GelUyeNo) & ' ait Aidat Ödeme' AS E2 FROM T020_UyeBorc " & _
  3. "WHERE (((Format([Donem],'yyyymm'))=" & Format(Me.Frm_DonemTarihi, "yyyymm") And ([Tur])= " & Me.Frm_BorcTuruSecim.Column(0) & "))"





  Alıntı
Bu mesajı beğenenler:
#23
Visual Basic
  1. CurrentDb.Execute "INSERT INTO T030_BankalarIslem ( Tarih, Islem, GelUyeNo, Tutar, Aciklama ) " & _
  2. "SELECT T020_UyeBorc.Donem, '" & Me.Frm_BorcTuruSecim.Column(0) & "' AS E1, T020_UyeBorc.GelUyeNo, T020_UyeBorc.Tutar, UCase(format(T020_UyeBorc.Donem,'mmmm - yyyy')) & ' Dönemi ' & dlookup('AdSoyad','S026_GELIR_UYE_SECIM','clng(GelUyeNo)=' & T020_UyeBorc.GelUyeNo) & ' ait Aidat Ödeme' AS E2 FROM T020_UyeBorc " & _
  3. "WHERE (((Format([Donem],'yyyymm'))=" & Format(Me.Frm_DonemTarihi, "yyyymm") & ") And (([Tur])= " & Me.Frm_BorcTuruSecim.Column(0) & "))"



olarak deneyin....



  Alıntı
Bu mesajı beğenenler:
#24
(17-04-2018, 22:01)dsezgin demiş ki:
Visual Basic
  1. CurrentDb.Execute "INSERT INTO T030_BankalarIslem ( Tarih, Islem, GelUyeNo, Tutar, Aciklama ) " & _
  2. "SELECT T020_UyeBorc.Donem, '" & Me.Frm_BorcTuruSecim.Column(0) & "' AS E1, T020_UyeBorc.GelUyeNo, T020_UyeBorc.Tutar, UCase(format(T020_UyeBorc.Donem,'mmmm - yyyy')) & ' Dönemi ' & dlookup('AdSoyad','S026_GELIR_UYE_SECIM','clng(GelUyeNo)=' & T020_UyeBorc.GelUyeNo) & ' ait Aidat Ödeme' AS E2 FROM T020_UyeBorc " & _
  3. "WHERE (((Format([Donem],'yyyymm'))=" & Format(Me.Frm_DonemTarihi, "yyyymm") & ") And (([Tur])= " & Me.Frm_BorcTuruSecim.Column(0) & "))"



olarak deneyin....

İlginize Teşekkürler. Ama malesef olmadı. Hata verdi. Hata mesajını "Çok az parametre. 1 bekliyor" bu sizce neden olabilir ?


Eklenti Dosyaları
.png   Hata.png (Boyut: 2,91 KB / İndirilme: 44)



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Gelişmiş Yönetici Araçları (yönetim Paneli) tanyeri 10 456 17-02-2022, 12:57
Son Mesaj: tanyeri
  Acces Otobüs Firması Yönetim Sistemi ile İlgili Veri Tabanı Hazırlama ysnhyta 7 6.742 03-01-2019, 13:55
Son Mesaj: karabasan
  Taruz Hocamızın Gelişmiş Yönetici Araçları (Yönetim Paneli) Örneği M_Kemal_Askeri 0 1.182 12-07-2018, 21:10
Son Mesaj: M_Kemal_Askeri
access-sql-7 [TABLO] Apartman Yönetici Tablosu kivanc12 1 2.376 22-12-2016, 07:07
Son Mesaj: dsezgin
  TALEP:Meslek yüksekokulu Haftalık ders programı hazırlama programı bahriye terlemez 2 3.222 12-09-2015, 10:33
Son Mesaj: afatsum75
access-sql-9 [TABLO] Bir Apartman/Site Veri tabanını İçin Bir Profe Ödevim Var Yardımcı OLurmusunuz ? 19kerem05 2 2.057 01-05-2015, 20:57
Son Mesaj: 19kerem05
  [FORM] Dernek Yönetim Programı Ayvaz2841 11 10.482 09-01-2015, 16:05
Son Mesaj: doyranli
access-sql-3 [SORGU] Apartman Yakacak Formu kalabakli 2 2.646 16-07-2014, 21:10
Son Mesaj: gogoli01

Foruma Git:


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