Skip to main content

AccessTr.neT M.


Arama bulma cok uzun sürüyor, neden?

Arama bulma cok uzun sürüyor, neden?

Çözüldü #1
Merhaba hocalarım.
Biz yeditane bilgisayarla çalışıyoruz. Her bilgisayarda bir öndosya ve server de de birtane arkadosyamız var. Öndosyamızda 2 tanede arama metin kutumuz var. Bu metin kutuları serverdeki arkadosyadan verileri arayıp buluyor. Ama bulma süresi çok uzun oluyor ve çalışamaz hale geldik. Arama işini nasıl hızlandırabiliriz. Arama kutusuna yazdigim her harf 3-4 saniye sürüyor, 6 harf yazarsam asagi yukari 18-24 saniye arasi sürüyor.

Arkadaşlar şu anda 4.000 tane veri var. Bu veri 100.000 kadar çıkabilir. Bu verilere 6 ayda ulaşabiliyoruz. Altı aydan önceki verileri siliyoruz. Veriler 100.000 de geçmez.

Sorun nerede olabilir. Server mi, Öndosya mı, Arkadosya mı, Kodda mı, Sorguda mı?

Dosya yı aşağıdaki Link ten görebilirsiniz.
https://accesstr.net/konu-sirket-kapisi-...ght=kaleci
Dosyayı tekrar göndermeyeceğim, Formu şişirmek istemiyorum.

VBA daki Kodlar

Kod:
1
2
3
4
5
6
7
8
9
Private Sub Suchen1_Change()
Me.SuchenVorleufig1 = Me.Suchen1.Text
Me.untFrmKfz.Requery
End Sub

Private Sub Suchen2_Change()
Me.SuchenVorleufig2 = Me.Suchen2.Text
Me.untFrmKfz.Requery
End Sub


Sorgu Kodu Tabelle görünüm
Wie "*" & [Forms]![frmKfz]![SuchenVorleufig1] & "*"
Wie "*" & [Forms]![frmKfz]![SuchenVorleufig2] & "*"

Sorgu Kodu Sql görünüm

SQL Code
WHERE (((AbfKfzPersDE.NameVorname1) Like "*" & Forms!frmKfz!SuchenVorleufig1 & "*") And ((AbfKfzPersDE.Firma & "*" & [KFZ] & "*" & [Ausweisnr1] & "*" & [Datum1]) Like "*" & Forms!frmKfz!SuchenVorleufig2 & "*"))


Sazgılarımla
kaleci

Cevapla
Çözüldü #2
Öncelikle tablolarınıza dizin eklemeniz sizin için çok faydalı olacaktır.
AbfKfzPersDE tablosunun NameVorname1 alanı ile AbfKfzPersDE tablosunun Firma alanına dizin eklerseniz arama sonuçlarınız çok hızlanacaktır.
Ayrıca metin değişince arama yerine butona basınca arama işlemini başlatırsanız en azında her yeni harfte arama süreniz uzamaz.

komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
Cevapla
...........
Çözüldü #3
Sayın kur@l,
hıylı bir şekilde cevap verdiğiniz için çok teşekür ederim.
Şimdi dizinle ne kastettiniz dersem şaşırmayınız, çünkü bendeki Access tamamen almancadır.
Eğer gönderdiğim dosya üzerinde uygulamalı olarak gösterme imkanı bulabilirseniz, bize çok büyük bir yardımda bulunmuş olursunuz. Şu anda gerçekten çalışamaz hale geldik.

Saygılarımla
kaleci

Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da