mungkin ini bisa membantu.
konfirmasi = MsgBox("Apakah Anda Yakin Akan Menghapus Item " &
Trim(dg.columns(i).value & "?", vbYesNo + vbQuestion, "Konfirmasi")
If konfirmasi = vbYes Then
sql = "delete from barang where id='" & Trim(dg.columns(i).value) & "'"
cnn.Execute (sql)
adobrg.Refresh '>>>> kalo anda mengunakan adodc lalukan refresh untuk
melihat perubahan
Else
Exit Sub
End If
nb : dg.columns(i).value >>> nilai kolom dalam datagrid.
saripudin hidayat <[EMAIL PROTECTED]> wrote:
Rekan-rekan programmer VB,
Saat ini saya sedang mengalami kesulitan.
Saya ingin menghapus sebuah record didatagrid dengan cara mengklik record
tersebut, kemudian muncul messsege box konfirmasi penghapusan, jika user
memilih yes maka record dihapus dan tabel di database SQL server 2000 yang
mengandung record tersebut diperbarui.
Ada yang bisa share koding programnya ga ?
Terima kasih atas perhatiannya.
________________________________________________________
Bergabunglah dengan orang-orang yang berwawasan, di di bidang Anda! Kunjungi
Yahoo! Answers saat ini juga di http://id.answers.yahoo.com/
[Non-text portions of this message have been removed]
---------------------------------
Kunjungi halaman depan Yahoo! Indonesia yang baru!
[Non-text portions of this message have been removed]
