• Foruma hoş geldin 👋 Ziyaretçi

    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 tamamen ücretsizdir.

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

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
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

  • 1.png
    1.png
    40 KB · Gösterim: 10
  • 2.png
    2.png
    12.5 KB · Gösterim: 9
  • ADO listbox isim a-z.xlsb
    49.8 KB · Gösterim: 10
Sorguya order by [isimalanı] gibi bir kod eklediniz mi?
 

Ekli dosyalar

  • Screenshot_1.png
    Screenshot_1.png
    12.8 KB · Gösterim: 4
Private Sub TextBox_Kriter_Change() bu kod içinde ado olmadığı için sıralamıyor abey :)
 
Sub PersonelVerileriniGetir()

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

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


C#:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Refaz hocam bilgisaya olmadığından inceleyemiyorum ama kodunuzdan anladigim kadarıyla case e gerek yok gibi
Dogrudan comboya atıf yeterli sanki
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
"
 
Refaz hocam bilgisaya olmadığından inceleyemiyorum ama kodunuzdan anladigim kadarıyla case e gerek yok gibi
Dogrudan comboya atıf yeterli sanki
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
"
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.
 
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
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.
 
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Geri
Üst