AccessTr.neT
bir comboboxtan veri seçince diğer comboboxlara veri getirmek - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: bir comboboxtan veri seçince diğer comboboxlara veri getirmek (/konu-bir-comboboxtan-veri-secince-diger-comboboxlara-veri-getirmek.html)



bir comboboxtan veri seçince diğer comboboxlara veri getirmek - alican60 - 16/02/2014

Herhangi bir comboboxtan veri seçince diğer comboboxlara ilgili verileri getirmek istiyorum.Excel için uyguladığım kodu vb.net için kullanmak istiyorum ama vb.nette "getrows" metodu olmadığı için hata alıyorum,bu konuda yardımınızı bekliyorum.


Cvp: bir comboboxtan veri seçince diğer comboboxlara veri getirmek - benremix - 07/10/2014

Konu güncel mi?


Cvp: bir comboboxtan veri seçince diğer comboboxlara veri getirmek - alican60 - 12/10/2014

Evet Sayın Benremix halen çözüm bulmuş değilim.


Cvp: bir comboboxtan veri seçince diğer comboboxlara veri getirmek - benremix - 12/10/2014

Bazen konular arada kaynayabilir. Bunun için arada bir güncellemek gerekir.

Saygılar...


Cvp: bir comboboxtan veri seçince diğer comboboxlara veri getirmek - drummers - 14/10/2014

(16/02/2014, 12:59)alican60 yazdı: Herhangi bir comboboxtan veri seçince diğer comboboxlara ilgili verileri getirmek istiyorum.Excel için uyguladığım kodu vb.net için kullanmak istiyorum ama vb.nette "getrows" metodu olmadığı için hata alıyorum,bu konuda yardımınızı bekliyorum.


Private Sub illeri_getir()
Dim veriler As New System.Data.DataTable("il")
Dim adapter As New OleDbDataAdapter("select * from il order by ilad", baglanti)
adapter.Fill(veriler)
ilcombobox.ValueMember = "il_id"
ilcombobox.DisplayMember = "ilad"
ilcombobox.DataSource = veriler
baglanti.Close()
End Sub

Private Sub ilce_getir()
Dim veriler As New System.Data.DataTable("il")
Dim adapter As New OleDbDataAdapter("select * from ilce where il_id=" & Me.ilcombobox.SelectedValue & " order by ilcead", baglanti)
adapter.Fill(veriler)
ilcecombobox.ValueMember = "ilce_id"
ilcecombobox.DisplayMember = "ilcead"
ilcecombobox.DataSource = veriler
baglanti.Close()
End Sub

Mantık bu.