A.S.C Filtre, Grafik ve Raporlama Eklentisi

çok Parametreli Sql Sorgusu
#13
Geçici bir tablo oluşturduğumuzu düşünün her tıkladığımızda
1 - tablo boşaltılır
2 - tüm kayıtlar eklenir
3 - 8. mesajdakine benzer bir döngüyle her alan için
Visual Basic
  1. delete * from geçicitablo where alanX not in (select alanX from tablo2)


benzeri bir kodla geçici tablodaki kritere uymayan veriler silinir
Bu sadece alternatif bir yöntem çok fazla kriter olduğunda sorun çıkarsa diye kullanabileceğiniz
Ama doğrudan tablo olduğu için daha hızlı olacağını düşünüyorum
Ama taktir sizin
Not: gerçi kesin olarak çalışır mı emin değilim denemek gerek



  Alıntı
Bu mesajı beğenenler:
#14
geçici tabloyla denedim sorgudan daha ağır çalışıyor her defasında veri sil/ekle/sadece kriterli olanı sil  baya kasıyor
dilerim kriter sorunu çıkmaz ama çıkarırsa da bileşik sorgu kullanilabilir



  Alıntı
Bu mesajı beğenenler:
#15
(02-04-2021, 23:36)halily demiş ki: geçici tabloyla denedim sorgudan daha ağır çalışıyor her defasında veri sil/ekle/sadece kriterli olanı sil  baya kasıyor
dilerim kriter sorunu çıkmaz ama çıkarırsa da bileşik sorgu kullanilabilir

Hocam maalesef performans engeline takıldık. Ben 200 alan için onay kutusu ekledim. Ve isimlerini tanımladım. Ama 18. 19. kliklemeden sonra her klikte 15dk bekletiyor maalesef. Daha fazla klikleme bu süreyi kat ve kat arttıracaktır. Ben son şeklindi gönderiyorum belki onay kutuları ekli bir şekilde geliştirme daha hızlı yapabilirsiniz diye. Bilemedim nasıl çözeceğimi..

Saygılarımla


Eklenti Dosyaları
.rar   AdnaFrm_in select_hy.rar (Boyut: 2,36 MB / İndirilme: 6)



  Alıntı
Bu mesajı beğenenler:
#16
her tıklamada çalışacağına bir buton atayarak çalışmasını sağlamak daha mantıklı olmaz mı



  Alıntı
Bu mesajı beğenenler:
#17
aşağıdaki dosyayı dener misiniz?
geçici tablo TmpTablo1 eklenip tüm işlemler onun üzerinde yapılıyor
kodlar
Visual Basic
  1. Private Sub Cereceve_AfterUpdate()
  2. For x = 1 To 200
  3. If Me.Cereceve = 3 Then Controls("x" & x) = -1 - (Controls("x" & x)) Else Controls("x" & x) = Me.Cereceve
  4. Next x
  5. End Sub


Visual Basic
  1. Private Sub Form_Open(Cancel As Integer)
  2. CurrentDb.Execute "delete * from tmpTablo1"
  3. CurrentDb.Execute "insert into tmpTablo1 SELECT * FROM tablo1"
  4. Me.Afrm.Requery
  5. End Sub


Visual Basic
  1. Private Sub Komut386_Click()
  2. CurrentDb.Execute "delete * from tmpTablo1"
  3. CurrentDb.Execute "insert into tmpTablo1 SELECT * FROM tablo1"
  4. 'hy__________________________________________Sorgu Güncelle
  5. For x = 1 To 200
  6. If Controls("X" & x) = True Then
  7. SqlSil = "delete * from tmptablo1 where ([X" & x & "] not In (select [X" & x & "] from [Tablo2]))"
  8. CurrentDb.Execute SqlSil
  9. End If
  10. Next x
  11. Afrm.Requery
  12. MsgBox "Bitti"
  13. End Sub



.rar   AdnaFrm_in select_hy3.rar (Boyut: 2,34 MB / İndirilme: 7)



  Alıntı
Bu mesajı beğenenler:
#18
Hocam öncelikle elinize emeğinize sağlık. Sanırım sona yaklaştık. Ben projeyi inceledim. Deneme amaçlıda mevcut kayıtlara +10 satır ilave ettim. Ve buradaki verilerin hepsi 1 den 200 e kadar sıralı şekilde yazıldı. 10 satırın 7 satırında bazı alanlardaki verileri sildim. 3 satır tüm alanları dolu şekliyle kaldı. Referans tabloya da (tablo2 ye de) 1 den 200 e kadar tüm değerleri tek satır şeklinde yazdım. Ama null olanları maalesef sonuç kümesinde getirdi. Örnek görsel ekteki gibidir.


Eklenti Dosyaları
.jpg   sayı.jpg (Boyut: 361,79 KB / İndirilme: 6)



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [SORGU] Ilk Ve Son Tarih Sorgusu sdurg 1 144 20-03-2021, 17:51
Son Mesaj: dsezgin
  [SORGU] 2 Tablo Arasında Güncelleme Sorgusu lemoncher2 6 324 17-01-2021, 22:33
Son Mesaj: lemoncher2
  Veritabanından Tarih Sorgusu yahyamacit 7 250 06-12-2020, 15:30
Son Mesaj: halily
  [SORGU] Ekleme Ve Silme Sorgusu blumanx 2 300 16-06-2020, 17:01
Son Mesaj: blumanx
  [VBA] Dizi Parametreli Sorgu Hatası salcasel 6 361 11-02-2020, 18:20
Son Mesaj: salcasel
access-sql-9 [SORGU] Excel Vba Access Arama Sorgusu Yavuzmumcu 1 686 01-02-2020, 14:10
Son Mesaj: userx53
  Il Ve Ilçe Sorgusu Satir 16 873 09-12-2019, 10:28
Son Mesaj: Satir
  [SORGU] Run-time Error '3340' "sorgusu Bozuk Hatası ÜmitSamlı 8 846 02-12-2019, 10:22
Son Mesaj: ÜmitSamlı

Foruma Git:


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