Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   Access'de Form Içinde Arama

Access'de Form Içinde Arama
halily
Access Takımı

*
Kayıt Tarihi: 29.06.2014
Toplam 3 konu açtı.
Toplam 1.709 yorum yaptı.
Toplam 464 puanı bulunmakta.
Beğeniler: 13 / 108
#19
25-10-2022, 11:19
sonda yere alan & _ değerlerini silip aşağıdaki gibi dener misiniz
ben hepsini yapmadım aradakileri siz yaparsınız?
eğer bu haliyle de sorun çıkarırsa yanılmıyorsam access sorgularında maximum karakter sınırı vardır
o durumda ya bu sınırı aşmayacak şekilde birkaç ayrı UNION sorgusu oluşturulup onlar birleştirilir
yada -verileri serverdan almak gibi bir şeyden bahsetmiştiniz- access üzerinden servera bağlanıp iş ona yaptırılabilirsiniz
serverın sorgu kapasitesi inanılmaz yüksek milyonlararca satır işlemi yaptırabiliyorsunuz
Visual Basic
  1. Private Sub Metin0_Change()
  2. xUnion = xUnion & "select A.* from (select * from 1 " 
  3. xUnion = xUnion &          "union All " 
  4. xUnion = xUnion &          "select * from 2 " 
  5. xUnion = xUnion &          "union All " 
  6. xUnion = xUnion &          "select * from 3 " 
  7. xUnion = xUnion &          "union All " 
  8. xUnion = xUnion & "select * from 4 " 
  9. xUnion = xUnion &          "union All " 
  10. xUnion = xUnion &          "select * from 5 " 
  11. xUnion = xUnion &          "union All " 
  12. xUnion = xUnion & "select * from 6 " 
  13. xUnion = xUnion &          "union All " 
  14. xUnion = xUnion &          "select * from 7 " 
  15. xUnion = xUnion &          "union All " 
  16. xUnion = xUnion & "select * from 8 " 
  17. xUnion = xUnion &          "union All " 
  18. xUnion = xUnion &          "select * from 9 " 
  19. xUnion = xUnion &          "union All " 
  20. '.... diğer alanlar
  21. xUnion = xUnion &          "select * from S15) as A where A.Ad like '*" & Me.Metin0.Text & "*'"
  22. Me.alt_form.Form.RecordSource = xUnion
  23. End Sub





  Bul
  Alıntı
Bu mesajı beğenenler:
Asistan1
Aktif Üye 40-100

*
Kayıt Tarihi: 05.04.2021
Toplam 3 konu açtı.
Toplam 40 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 1 / 0
#20
25-10-2022, 13:04
(25-10-2022, 11:19)halily demiş ki: sonda yere alan & _ değerlerini silip aşağıdaki gibi dener misiniz
ben hepsini yapmadım aradakileri siz yaparsınız?
eğer bu haliyle de sorun çıkarırsa yanılmıyorsam access sorgularında maximum karakter sınırı vardır
o durumda ya bu sınırı aşmayacak şekilde birkaç ayrı UNION sorgusu oluşturulup onlar birleştirilir
yada -verileri serverdan almak gibi bir şeyden bahsetmiştiniz- access üzerinden  servera bağlanıp iş ona yaptırılabilirsiniz
serverın sorgu kapasitesi inanılmaz yüksek milyonlararca satır işlemi yaptırabiliyorsunuz
Visual Basic
  1. Private Sub Metin0_Change()
  2. xUnion = xUnion & "select A.* from (select * from 1 " 
  3. xUnion = xUnion &          "union All " 
  4. xUnion = xUnion &          "select * from 2 " 
  5. xUnion = xUnion &          "union All " 
  6. xUnion = xUnion &          "select * from 3 " 
  7. xUnion = xUnion &          "union All " 
  8. xUnion = xUnion & "select * from 4 " 
  9. xUnion = xUnion &          "union All " 
  10. xUnion = xUnion &          "select * from 5 " 
  11. xUnion = xUnion &          "union All " 
  12. xUnion = xUnion & "select * from 6 " 
  13. xUnion = xUnion &          "union All " 
  14. xUnion = xUnion &          "select * from 7 " 
  15. xUnion = xUnion &          "union All " 
  16. xUnion = xUnion & "select * from 8 " 
  17. xUnion = xUnion &          "union All " 
  18. xUnion = xUnion &          "select * from 9 " 
  19. xUnion = xUnion &          "union All " 
  20. '.... diğer alanlar
  21. xUnion = xUnion &          "select * from S15) as A where A.Ad like '*" & Me.Metin0.Text & "*'"
  22. Me.alt_form.Form.RecordSource = xUnion
  23. End Sub


Az önce yanlış denemişim. Dediğiniz gibi yaptım. kopyalandı. Ama bu defa çalışırken başka hata veriyor.

girdiğiniz ifade kapalı veya silinmiş bir nesneye başvuruyor hatası alıyorum. Debug dediğimde ise
Visual Basic
  1. Me.alt_form.Form.RecordSource = xUnion


bu kısım sarı renkli yanıyor



  Bul
  Alıntı
Bu mesajı beğenenler:
alperalper
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 06.11.2013
Toplam 93 konu açtı.
Toplam 624 yorum yaptı.
Toplam 88 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016, Office 2019,
Beğeniler: 0 / 31
#21
25-10-2022, 13:13 (En son düzenleme: 25-10-2022, 13:14 alperalper.)
Bu kadar çok tabloyu bir sorgu içinde birleştirmek doğru mu? Bu tablolarda ne kadar veri ve ne türde veriler olduğunu bilmiyorum çünkü örnek bir dosya yok. Ancak veriler arttıkça sizin form kasılacaktır. Şimdiden bilginiz olsun. Birşey sormak istiyorum mesela 1 nolu tabloda olan veri 5 nolu tabloda olacak mı? birde aramayı hangi alanda yapıyorsunuz? Birde bu tabloları niçin böyle isimlendirdiniz? Bunlar ne anlama geliyor? Sınıfların adı mı?



  Bul
  Alıntı
Bu mesajı beğenenler:
Asistan1
Aktif Üye 40-100

*
Kayıt Tarihi: 05.04.2021
Toplam 3 konu açtı.
Toplam 40 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 1 / 0
#22
25-10-2022, 13:27
(25-10-2022, 13:13)alperalper demiş ki: Bu kadar çok tabloyu bir sorgu içinde birleştirmek doğru mu? Bu tablolarda ne kadar veri ve ne türde veriler olduğunu bilmiyorum çünkü örnek bir dosya yok. Ancak veriler arttıkça sizin form kasılacaktır. Şimdiden bilginiz olsun. Birşey sormak istiyorum mesela 1 nolu tabloda olan veri 5 nolu tabloda olacak mı? birde aramayı hangi alanda yapıyorsunuz? Birde bu tabloları niçin böyle isimlendirdiniz? Bunlar ne anlama geliyor? Sınıfların adı mı?

tablo isimleri hiçbir anlam ifade etmiyor. herhangibi birşey de olabilir. hatta hepsini toplayıp 1 tabloda da yapılabilir. her bir tabloda bir klasördeki dosyaların dosya adları ve o dosyanın dosya yolu olan 2 stün kalinde bilgiler var.

örneğin

1 nolu tabloda

CV.docx dökümanı ve C:\Users\Kisisel gibi dosyanın olduğu yol var.

tüm tabloların içeriği böyle. bir sürü word pdf vs dökümanlar ve yolları var.

1 nolu tabloda olan belki 5 nolu tabloda da olabilir ya da olmayabilir. 
yani aynı döküman başka klasörler içinde kopyalanmışsa olabilir demek oluyor.



  Bul
  Alıntı
Bu mesajı beğenenler:
halily
Access Takımı

*
Kayıt Tarihi: 29.06.2014
Toplam 3 konu açtı.
Toplam 1.709 yorum yaptı.
Toplam 464 puanı bulunmakta.
Beğeniler: 13 / 108
#23
25-10-2022, 13:38
(24-10-2022, 16:22)Asistan1 demiş ki: Bir sunucudaki tüm dosyaları dosya adı ve dosya yolu şeklinde excell tablosuna aktardım.
bu yazdığınızdan anladığım kadarıyla verileriniz aslında sunucuda öyle mi? o zaman verileri neden sunucuda aramıyorsunuz?



  Bul
  Alıntı
Bu mesajı beğenenler:
Asistan1
Aktif Üye 40-100

*
Kayıt Tarihi: 05.04.2021
Toplam 3 konu açtı.
Toplam 40 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 1 / 0
#24
25-10-2022, 13:48
(25-10-2022, 13:38)halily demiş ki:
(24-10-2022, 16:22)Asistan1 demiş ki: Bir sunucudaki tüm dosyaları dosya adı ve dosya yolu şeklinde excell tablosuna aktardım.
bu yazdığınızdan anladığım kadarıyla verileriniz aslında sunucuda öyle mi? o zaman verileri neden sunucuda aramıyorsunuz?

Evet sunucuda.
Sunucuda dosya aramak çok zaman kaybı oluyor. Çok fazla dosya var. o yüzden dosya adlarını ve yollarını bir tabloya çekip o tabloda aramak daha hızlı sonuç veriyor.



  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [SORGU] Kelime Içinde Geçen 2 3 4 Harfe Göre Veri Doldurma toros333 1 202 16-02-2026, 02:12
Son Mesaj: dsezgin
  [SORGU] Sorgu Ifadesi Içindeki Fonksiyon Ifade Içinde Kullanılamaz Hatası Mecnun24 7 659 27-08-2024, 16:53
Son Mesaj: Mecnun24
  [VBA] Metin Içerisindeki Kelimeler Ile Arama Yapma ekremer1969 6 1.329 22-06-2024, 16:15
Son Mesaj: dsezgin
  [FORM] Arama Sorunu Pasham 0 375 08-04-2024, 14:32
Son Mesaj: Pasham
  [FORM] form klasör içinde dosya kontrolü obaysal42 4 2.496 29-12-2023, 10:24
Son Mesaj: burhanb
  [SORGU] Sorgu icinde gruplama MuazTurkyilmaz 6 2.864 23-11-2023, 00:53
Son Mesaj: dsezgin
  Liste Arama Kutusundan Kayıt Silme CarpeDiem 12 862 21-07-2023, 10:31
Son Mesaj: onur_can
  [FORM] Forma Arama Ekleyemedim :( finishim 16 1.132 16-05-2023, 12:44
Son Mesaj: finishim

Foruma Git:


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