Listeleme ve Secenekler
#1
Walla Yapmaya Çalıştığım Örnek Ekte Hocalarım ve Arkadaşlar Konu Başlığınada Yazacak Bişi Bulamadım O Yuzden Oyle Yazdım... Wubclub


Eklenti Dosyaları
.rar   krediler.rar (Boyut: 14,48 KB / İndirilme: 76)



  Alıntı
Bu mesajı beğenenler:
#2
Liste2 nin satır kaynağını değiştirin..:

SQL
  1. SELECT Krediler.ID, Krediler.Kredi, Krediler.Taksit, Krediler.Tarih, Krediler.Tutar
  2. FROM Krediler WHERE (((Krediler.Kredi)=[Forms]![Kredi]![Liste0])
  3. AND ((Krediler.Sec)=FALSE)) ORDER BY Krediler.Kredi, Krediler.ID;



Liste4 ün satır kaynağını değiştirin..:

SQL
  1. SELECT Krediler.ID, Krediler.Kredi, Krediler.Taksit, Krediler.Tarih, Krediler.Tutar
  2. FROM Krediler WHERE (((Krediler.[Kredi])=[Forms]![Kredi]![Liste0])
  3. AND ((Krediler.Sec)=TRUE)) ORDER BY Krediler.[Kredi], Krediler.[ID];




Formunuzun kod sayfasını açın ve ne varsa silip bunu yapıştırın..:

Visual Basic
  1. Option Compare Database
  2.  
  3. Private Sub CmdUnwanted_Click()
  4. Dim kriter
  5. kriter = Liste4
  6. CurrentDb.Execute "update Krediler set Sec = 0 " _
  7. & " where ID=" & kriter
  8. Call Liste0_AfterUpdate
  9. End Sub
  10.  
  11. Private Sub CmdWanted_Click()
  12. Dim kriter
  13. kriter = Liste2
  14. CurrentDb.Execute "update Krediler set Sec = -1 " _
  15. & " where ID=" & kriter
  16. Call Liste0_AfterUpdate
  17. End Sub
  18.  
  19. Private Sub Liste0_AfterUpdate()
  20. Liste2.Requery
  21. Liste4.Requery
  22. End Sub











  Alıntı
Bu mesajı beğenenler:
#3
Sayın destinazi;

İyi akşamlar.

Sayın Taruz'un eklediği kodlu sonrası dosyanın son şeklini ekleyebilir misiniz?


Sayın Taruz;

İyi akşamlar.. Katkınız için teşekkürler.

Selam ve sevgiler..



  Alıntı
Bu mesajı beğenenler:
#4
Öncelikle Yapım İçin TARUZ Hocama Çok Çok Teşekkürler,
Hocam Ellerinize Sağlık Çok Güzel Bi Çalışma Oldu... Saygı ve Sevgilerimle... Wubclub Wubclub Wubclub

Syn. assenucler
buyur Kardeşim Ekledim Kodlar Kullanılmış Şekilde... Wubclub


Eklenti Dosyaları
.rar   krediler-Trz.rar (Boyut: 23,2 KB / İndirilme: 93)



  Alıntı
Bu mesajı beğenenler:
#5
Sayın destinasi;

Paylaşımınız için teşekkürler..



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Access De En Sade Ve Basit Halde Listeleme ibrahim.kut 1 370 27-11-2024, 01:03
Son Mesaj: dsezgin
  [VBA] Dersi Seçen öğrencileri Listeleme programmer67 0 269 23-05-2023, 12:00
Son Mesaj: programmer67
  şarta Bağlı Listeleme SBNS 10 1.286 22-06-2021, 17:10
Son Mesaj: ekremer1969
  Dinamik Kayıt Arama, Listeleme Ve Aktarma Aracı kamil_55 15 1.696 24-03-2021, 18:39
Son Mesaj: kamil_55
  [VBA] Vba'da Iki Tarih Arasında Veri Listeleme M_Kemal_Askeri 2 1.290 17-02-2021, 23:59
Son Mesaj: M_Kemal_Askeri
  [SORGU] Açılan Kutu Koşullu Listeleme eagle28 16 1.585 17-01-2021, 19:01
Son Mesaj: eagle28
  [SORGU] Iç Içe Soru Kullanarak 2 Tablodan Veri Alma Ve Listeleme Hakkında nissan0159 1 881 23-12-2020, 09:13
Son Mesaj: dsezgin
  [SORGU] Ardışık Sayılardan Atlananları Listeleme wassubii 5 765 25-05-2020, 11:27
Son Mesaj: wassubii

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar):