AccessTr.neT

Bu örnekte AdiSoyadi sütununda aynı isimler kaydedildiğinde Ara/Bul combobox ında o kadar isim gözüküyor. Ara/Bul combobox ında aynı isimleri tekrarlamadan tek göstersin istiyorum. Yardımlarınızı bekliyorum. Teşekkürler...

merhaba,

DISTINCT komutu;
benzer ya da diğer bir genel ifade ile tekrarlanan kayıtların istenen alanda görünmesini engellemek için kullanılır.

sql satırı için aşağıdaki kodu kullanabilirsiniz.

Örnek:
SELECT DISTINCT alanadi FROM tabloadi

iyi çalışmalar.

   Private Sub doldur()

        Dim baglanti As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source='kayıt.mdb'")



        baglanti.Open()

        Dim komut As New OleDb.OleDbCommand("Select Kayitlar.AdiSoyadi FROM Kayitlar GROUP BY Kayitlar.AdiSoyadi", baglanti)



        Dim oku As OleDb.OleDbDataReader

        oku = komut.ExecuteReader()

        While oku.Read()

            ComboBox1.Items.Add(oku("AdiSoyadi"))

        End While



        baglanti.Close()



    End Sub

olarak değiştiriniz....

Çok teşekkür ederim ilgilerinize doldur() dediğiniz gibi yaptım çalıştı. iyi ki varsınız ALLAH razı olsun...Combobox düzgün çalıştı istediğim gibi ama tam test ettiğimde bu seferde SİLME işleminde sorun çıktı. Combobox dan seçtiğim birden fazla olan aynı kayıtların tamamını silmeye başladı ayrıca Datagridview dede sildiğini göstermiyor. Yardım edermisiniz lütfen.

Combobox düzgün çalıştı istediğim gibi ama tam test ettiğimde bu seferde SİLME işleminde sorun çıktı. Combobox dan seçtiğim birden fazla olan aynı kayıtların tamamını silmeye başladı ayrıca Datagridview dede sildiğini göstermiyor. Yardım edermisiniz lütfen.

Bu projede comboboxın kayıtları üst üste bindirmemesi için KAYDET-SİL-DÜZELT bölümlerinde ComboBox1.Items.Clear() ve doldur() kullandım ve sonuç olarak istediğim gibi çalıştı. Ancak combobox aynı isimde olan kişileri kaç tane varsa o kadar gösterdi. O zamanda SİL düzgün çalışmadı. doldur() dediğiniz gibi yaptığımda ise Combobox düzgün çalışıyor fakat SİL deyince aynı kayıtlar siliniyor ama bu göstermiyor açıp kapattığınızda aynı kayıtların silindiğini görüyorsunuz. Neyi yanlış yapıyorum bilemedim. Yardımlarınızı bekliyorum.