Topic: VB,Net dan MySql server,mohon bantuan pencerahan tentang Join Tabel
Assalamualaikum tuk semua,
Numpang tanya untuk senior-senior dan agan-agan yang
dah mahir dalam pengkodingan khususnya bahasa pemograman VB.Net
berikut ini ada yang saya mau saya tanyakan. saya sedang membuat sebuah program
data base tentang transaksi project kontruksi dimana isi data base nantinya akan
saya simpan pada MySql server,data base tersebut saya buat 3 tabel dimana tiap
tabel terdiri dari tb_kategori,tb_rekanan dan tb_fakturkeluaran.
masalahnya sekarang adalah sya ingin memangil nama sembuah perusahaan yang
sudah sudah saya record sebelumnya di tb_rekanan dengan mengetikan no.NPWP perusahaan
tersebut tetapi yang terjadi nama perusahaan itu tidak tampil/muncul pada form fakturKeluaran
tersebut. (saya mengunakan VB.net)
berikut coding yang saya buat agar nama perusahaan tersebut muncul pada
form fakturkeluaran :
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtNpwp.TextChanged
If Len(txtNpwp.Text) < 20 Then Exit Sub
tbfakturkeluar = Proses.ExecuteQuery("SELECT * FROM tb_rekanan WHERE NPWP='" & txtNpwp.Text & "'")
If tbfakturkeluar.Rows.Count < 0 Then
With tbRekanan.Rows(0)
txtNama.Text = .Item("Nama")
End With
Aktif()
txtDescrip.Focus()
btnSimpan.Enabled = True : btnKeluar.Enabled = True
btnUpdate.Enabled = True : btnHapus.Enabled = True
btnBatal.Enabled = True
Else
Call Aktif()
txtDescrip.Focus()
btnSimpan.Enabled = False
btnUpdate.Enabled = False : btnHapus.Enabled = False
btnBatal.Enabled = True
End If
End Sub
