Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
15/12/2012 20:31
Konu Sahibi
ynlmz
Yorumlar
3
Okunma
1936
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
ynlmz

ynlmz

Aktif Üye
49953
 49
 10
 36
 15/12/2012
0
 
 
 
 14/02/2017,17:07
Çözüldü 
Arkadaşlar; Visual Basic de Access veri tabanını kullanarak bir proje yapmaya çalışıyorum. Access te alandal isim li bir tablo ve tabloda da alan ve dal diye iki alan var. DataCombo1 de Alanları "SELECT T004_AlanDal.alanid FROM T004_AlanDal GROUP BY T004_AlanDal.alanid;" kodu ile gruplayarak aldırıyorum. DataCombo2 de de o alana ait dalları almak istiyorum ancak bir türlü aldıramadım. DataCombo2 ye ait Adodc ye nasıl bir Sql kodu yazmalıyım. Yardımlarınız için şimdiden teşekkürler.



ogulcan92

ogulcan92

Aktif Üye
6336
 54
 154
 1.159
 06/05/2009
480
 İzmir
 
 Ofis 2003
 07/08/2015,11:50
Çözüldü 
Sn:ynlmz
Yazdıklarınızdan pek birşey anlaşılmıyor lütfen örnek ekleyiniz.Eğer yapmak istediğiniz örneklersek bir tabloda iller diger tabloda o illere ait ilçeler gibi ise İl İlçe olarak artırsanız sitemizde örnekleri mevcut.



...........
drummers

drummers

Destek
6533
Om.... Ca....
 120
 414
 11/05/2009
125
 İzmir
 
 Ofis 2003
 29/05/2019,12:04
Çözüldü 
Eğer doğru anladım ise combobox1 den bişey seçince combobox2 de ona bağlı verilerin listelenmesini isiyorsun. eğer öyle ise örnek kod şunlar

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Private Sub ilDoldur1()
        Dim baglanti As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source='veritabanının ismi'")
        Dim veriler As New DataTable("iller")
        Dim adapter As New OleDbDataAdapter("select * from iller order by il_ad", baglanti)
        adapter.Fill(veriler)
        ComboBox1.ValueMember = "il_id"
        ComboBox1.DisplayMember = "il_ad"
        ComboBox1.DataSource = veriler
        baglanti.Close()

    End Sub
    Private Sub ilcedoldur1()
        Dim baglanti As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source='veritabanının ismi'")
        Dim veriler As New DataTable("iller")
        Dim adapter As New OleDbDataAdapter("select * from ilceler where il_id=" & Me.ComboBox1.SelectedValue & " order by ilce_ad", baglanti)
        adapter.Fill(veriler)
        ComboBox2.ValueMember = "ilce_id"
        ComboBox2.DisplayMember = "ilce_ad"
        ComboBox2.DataSource = veriler
        baglanti.Close()
    End Sub


Visual Basic Code
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        ilcedoldur1()
           End Sub


drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.

ynlmz

ynlmz

Aktif Üye
49953
 49
 10
 36
 15/12/2012
0
 
 
 
 14/02/2017,17:07
Çözüldü 
Sayın oğulcan sizin yazınıza cevap veremedim. Kusura bakmayın. Sayın drummers hocam size de ilginizden ve cevabınızdan dolayı çooook teşekkür ederim. Ellerine sağlık



...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü vb de dlookup kullanımı kokotuna 6 3.193 06/10/2014, 23:03
Son Yorum: Scarlett
Çözüldü Visual Basic 6.0 Grid Nesnesi Kullanımı ceforce 5 3.016 24/11/2013, 09:19
Son Yorum: alpeki99
Çözüldü DataReportta rownumber kullanımı ynlmz 4 1.930 02/10/2013, 11:33
Son Yorum: ogulcan92
Çözüldü Treeview kullanımı ynlmz 6 3.499 21/02/2013, 23:58
Son Yorum: ynlmz
Çözüldü Textbox kullanımı ve içeriğinin yönetilmesi byclever 12 5.398 09/03/2012, 18:17
Son Yorum: byclever

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.