alexa-tracking

Main Content

1024
1024
KASKUS
51
244
https://www.kaskus.co.id/thread/5302f51a118b4663578b460d/tombol-simpan-ke-database-access-2007-dgn-vb-10
Poll: Whats the meaning of FIRE??
Power 0% (0 votes)
Alive 0% (0 votes)
Tombol Simpan ke database Access 2007 dgn VB 10
sy ada masalah nih dengan pembuatan tombol simpan..
setelah sy buat coding utk menyimpan data ke database access 07,, contohx seperti ini =
Try
Call koneksi1()
dml1.Connection = database1
dml1.CommandType = CommandType.Text
dml1.CommandText = "insert into T_dtpeg(peg_no,peg_bagkrj,peg_jns,peg_pangkat,peg_gol,peg_jbt,peg_nip,peg_nama,peg_t4_lhr,peg_tgl_lhr,peg_jk,peg_agama,peg_kwg,peg_sts_kwn,peg_ank,peg_almt,peg_ibu,peg_notlp,peg_npwp,peg_sd,peg_smp,peg_sma,peg_smajur,peg_dip_nm,peg_dip_glr,peg_s1_nm,peg_s1_glr,peg_s2_nm,peg_s2_glr,peg_s3_nm,peg_s3_glr) values('" & tx_no.Text & "','" & tx_bagkrj.Text & "','" & cb_jns.Text & "','" & cb_pangkat.Text & "','" & cb_gol.Text & "','" & tx_jbt.Text & "','" & tx_nip.Text & "','" & tx_nama.Text & "','" & tx_t4_lhr.Text & "','" & dtp_tgl_lhr.Value & "','" & tx_rb.Text & "','" & cb_agama.Text & "','" & cb_kwg.Text & "','" & cb_sts_kwn.Text & "','" & tx_ank.Text & "','" & tx_almt.Text & "','" & tx_ibu.Text & "','" & tx_tlp.Text & "','" & tx_npwp.Text & "','" & tx_sd.Text & "','" & tx_smp.Text & "','" & tx_sma.Text & "','" & tx_sma_jur.Text & "','" & tx_dip_nm.Text & "','" & cb_dip_glr.Text & "','" & tx_s1_nm.Text & "','" & cb_s1_glr.Text & "','" & tx_s2_nm.Text & "','" & cb_s2_glr.Text & "','" & tx_s3_nm.Text & "','" & cb_s3_glr.Text & "')"
dml1.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.ToString())
End Try

dan berhasill..

nah sy menambahkan coding yg hampir sama utk menyimpan database access 07,, tetapi.. dgn tabel yg berbeda..

pasti gagal... [removed]void(0);

Mohon bantuannya.. buat coding yg bisa membuat "1 tombol click dapat menyimpan 2 tabel database"..