Yazı Font Küçült Yazı Font Büyült

Veritabanındaki İki Tabloyu Birleştirme

Bu örnekte Access veritabanındaki iki farklı tablodaki verileri birleştirip, DataGridView nesnemizde göstereceğiz. Personel veritabanındaki arge ve satis tablolarından verilerimizi çekiyoruz.  Sql sorgumuz aşağıdaki gibidir.  id nolara göre sıralıyoruz.

Resim1

Şekil 1

Resim2

Şekil 2

Resim3

Şekil 3

Form1.vb

Public Class Form1

 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim baglan As New OleDb.OleDbConnection

        Dim adp As New OleDb.OleDbDataAdapter

        Dim komut As New OleDb.OleDbCommand

        Dim ds As New DataSet

        baglan.ConnectionString = "PROVIDER= Microsoft.Jet.OLEDB.4.0;Data Source=personel.mdb"

        baglan.Open()

        komut.CommandText = "Select arge.id, arge.Ad, arge.Soyad, arge.Telefon, arge.Departman, satis.id, satis.Ad, satis.Soyad, satis.Telefon, satis.Departman From arge left join satis on arge.id = satis.id"

 

        adp.SelectCommand = komut

        komut.Connection = baglan

        adp.Fill(ds, "arge")

        DataGridView1.DataSource = ds.Tables("arge")

        baglan.Close()

    End Sub

End Class

 

Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN