Join Table

Sedikit review dari materi kuliah mengenai select join table adalah mengkombinasikan data/record lebih dari satu tabel pada database. Biasanya programmer membuat predikat JOIN untuk mengidentifikasi record yang akan di-join-kan. jika terevaluasi predikat join tersbut bernilai true, maka record yang akan di=join-kan akan memberikan hasil yang di tempatkan pada format tertentu, misalnya hasil join akan di kembalikan/di tempatkan pada sebuah listbox

langsung pada studi kasus kali ini saya memakai 3 tabel yang akan saya join kan yaitu tabel mhs, MK dan dosen seperti pada gambar :



dan outputnya yang akan saya inginkan adalah nim, nama_mhs, kode_mk, nama_mk, sks, dan dosen

sehingga syntax sqlnya menjadi
select A.NIM, A.Nama, B.kode_MK, B.Nama_MK, B.sks, C.nama_dosen from mhs A, MK B, Dosen C where A.NIM=B.NIM and B.kode_dosen=C.kode_dosen

dan jika di terapkan pada coding VB NET kurang lebihnya seperti berikut :

(dengan asumsi telah membuat koneksi databasenya..ini tidak saya bahas ada pada connect)

ini memakai konsep Connected

dim xread as sqldatareader
dim query as string
dim xcom as new sqlcommand

query="select A.NIM, A.Nama, B.kode_MK, B.Nama_MK, B.sks, C.nama_dosen from mhs A, MK B, Dosen C where A.NIM=B.NIM and B.kode_dosen=C.kode_dosen and A.NIM like " & Textbox1.text & "%'"
xcom.connection=xkoneksi
xread=xcom.executeReader
if xread.HasRow
Do While xread.Read
Listbox1.Item.Add(xread.Item(0) & " " & xread.Item(1) & " " & xread.Item(2) & " " & xread.Item(3) & " " & xread.Item(4) & " " & xread.Item(5) & " " & xread.Item(6))
loop
end if


semoga membantu


ref :

http://en.wikipedia.org/wiki/Join_%28SQL%29

WAL