• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Ado ile Listboxa çekilen Kayıtları A-Z sıralamak.

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
O

OğuzTürkyılmaz

Yeni Üye
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
31
Excel V
Office 365 TR
Konu Sahibi
Merhaba Herkese sağlıklı günler dilerim.
Uygulamada Ado ile Listboxa kayıtları çekiyorum. Listboxta arama yaptığımda gelen kayıtların A-Z ye sıralı gelmesi için SQL sorgu cümlesine nasıl bir kriter eklemeliyim. Yardımlarınız için Teşekkür ederim.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Tarihe göre sırala Oylara göre sırala
Sorguya order by [isimalanı] gibi bir kod eklediniz mi?
 
Olumlu oy 0 Negatif oyla
Private Sub TextBox_Kriter_Change() bu kod içinde ado olmadığı için sıralamıyor abey :)
 
Olumlu oy 0 Negatif oyla
Sub PersonelVerileriniGetir()

rs.Open "select * from [Personel$] order by ([adi])", con, 1, 3

Bu şekilde yapıp dener misiniz.
1669843945721.png
 
Olumlu oy 0 Negatif oyla
Combobox olduğu için select case ekledim gerisini devam edebilirsiniz.


HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Refaz hocam bilgisaya olmadığından inceleyemiyorum ama kodunuzdan anladigim kadarıyla case e gerek yok gibi
Dogrudan comboya atıf yeterli sanki
HTML:
CSS:
İçeriği görebilmek için Giriş yap ya da Üye ol.
"
 
Olumlu oy 0 Negatif oyla
halily' Alıntı:
Refaz hocam bilgisaya olmadığından inceleyemiyorum ama kodunuzdan anladigim kadarıyla case e gerek yok gibi
Dogrudan comboya atıf yeterli sanki
HTML:
CSS:
İçeriği görebilmek için Giriş yap ya da Üye ol.
"
Genişletmek için tıkla...
Haklısınız abey :)
Aslında select case aklıma şundan gelmişti.Sütun başlığında kodu yazıyordu ilk başta sayısal olduğunu düşünüp tek tırnak eklenmeyecek diye düşünmüştüm.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Özcan ÖZBEK' Alıntı:
Sub PersonelVerileriniGetir()

rs.Open "select * from [Personel$] order by ([adi])", con, 1, 3

Bu şekilde yapıp dener misiniz.
Ekli dosyayı görüntüle 13678
Genişletmek için tıkla...
Merhaba 4 no'lu mesajda sıralattığımı söylemiştim sizin de yaptığınız gibi, çalışan kodu yüklemişim yanlışlıkla. Textboxın change olayı gerçekleştiğinde çıkan sonuçlarda sıralama yapmıyordu. İlginiz için çok teşekkür ederim.
 
Olumlu oy 0 Negatif oyla
Olumlu oy 1 Negatif oyla
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst