IkhwanxiNUL

Setelah Postigan sebelumnya coding Simpan dan Hapus, selanjutnya kita akan membahas coding Update di VB 6.0, Langsung saja sql = "delete from supplier where idsup='" & Text1 & "'" con.Execute (sql) sql = "insert into supplier(idsup,nmsup,nohp,email,alamatsup)values('" & Text1 & "','" & Text2 & "','" & Text5 & "','" & Text4 & "','" & Text3 & "')" con.Execute (sql) Text1 = "" Text2 = "" Text3 = "" Text4 = "" ket: -untuk coding degan tulisan warna biru itu untuk menghapus data yang ada di table database -untuk coding dengan tulisan warna merah itu untuk menginput/menambahkan, jadi untuk logika coding updatenya adalah: pertama coding menghapus data yang ada di table database, dan selanjutnya memasukan dengan data yang baru. dan coding tersebut di letakan bersamaan, seper...

Setelah sebelumnya kita sudah membahas tentang coding simpan di Postigan ini , selanjutnya yaitu Coding Hapus,.. Langsung saja ini codingnya sql = "delete from nama_table where iduser='" & Text1 & "'" con.Execute (sql) Text1 = "" Text2 = "" Text3 = "" Text4 = "" ket: -untuk id user adalah filed yang menjadi primerykey di table tersebut,.. -mengapa ada (Text1 = "")?.. fungsinya adalah ketika di klik tombol hapus maka textbox yang telah di isi akan kosong kembali tanpa harus di hapus satu persatu... baiklah sekian untuk coding hapus... untuk coding update tunggu post selanjutnya

Lngsung saja tanpa basa basi, di bawah ini adalaha Coding Simpang sql = "insert into nama_table (nama, alamat, agama)values('" & Text1 & "','" & Text2 & "','" & Text3 & "')" con.Execute (sql) Text1 = "" Text2 = "" Text3 = "" ket: -nama_table adalah nama tempat table yang akan anda simpan. -nama, alamat, agama adalah filed yang pada tabel tersebut -'" & Text1 & "','" & Text2 & "','" & Text3 & "' adalahah tempat untuk memasukan isi dari filed. sampai di sini dulu... untuk coding hapus, batal, tampilkan, tunggu postingan selanjutnya