Input Data Transaksi dengan Visual Basic 6 (ADODC)

Pada pertemuan minggu lalu (https://rahmadyatrias.wordpress.com/2012/10/30/koneksi-dua-tabel-dalam-satu-form/) kita membuat satu form yang berisi koneksi dua tabel (adodc1 dan adodc2). Sekarang kita akan mencoba mengimplementasikan suatu manipulasi terhadap tabel kedua, misalnya transaksi barang. Barang yang dijual harus berada pada tabel material.

Buat isian pada input transaksi. Karena barang yang dijual harus berada di tabel material (bagian atas), maka di sini diberi tombol tekan “cari brg” agar sebelum transaksi, barang dipastikan ada pada tabel material. Gunakan kode berikut di tombol ‘Cari Brg’

Private Sub Command5_Click()

Adodc1.Recordset.MoveFirst

Adodc1.Recordset.Find “kode=” + Text5.Text + “”

If Not Adodc1.Recordset.EOF Then

Text6.Text = Adodc1.Recordset.Fields(1)

Else

MsgBox “maaf barang tidak ada”

End If

End Sub

Sedangkan untuk mengaktifkan tombol tekan input, gunakan kode berikut (perhatikan posisi text1, text2, dst harus sesuai dengan nama yang anda buat).

Private Sub Command4_Click()

Adodc2.Recordset.AddNew

Me.Adodc2.Recordset.Fields(0) = Text4.Text

Me.Adodc2.Recordset.Fields(1) = Text6.Text

Me.Adodc2.Recordset.Fields(2) = Text7.Text

End Sub

Ketika tombol CARI BRG ditekan akan menampilkan nama barang. Selanjutnya tinggal mengisi kolom isian lainnya sebelum tombol input ditekan

Iklan

8 respons untuk ‘Input Data Transaksi dengan Visual Basic 6 (ADODC)

    • karena normalisasi memecah data barang, pelanggan dan data transaksi maka butuh beberapa koneksi dari tabel yang berbeda. kecuali mekanisme denormalisasi dengan menggabungkan sementara tabel2 tersebut biasanya untuk kecepatan akses.

  1. Mas mau nanya lagi, tadi saya sudah coba bisa jikalau datagridnya itu digunain sedangkan kalau kita menghapus datagridnya, maka error, itu kenapa ya?

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout /  Ubah )

Foto Google+

You are commenting using your Google+ account. Logout /  Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout /  Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout /  Ubah )

w

Connecting to %s