xu li code nut xoa

Trang chủ
xu li code nut xoa
xu li code nut xoa

nguyenhoangbanhan > 17-06-15, 11:47 AM

sao em xoa no xoa nhung ngay dong xoa no coi hang chu delete nhu the nay ne, may bac giup dum em http://www.mediafire.com/view/5dpekd9cju...itled2.png[/img]
code xoa cua em nhu the nay ne:
[/php] Private Sub xoa_Click()
If MsgBox("ban co thuc su muon xoa mau tin nay khong", vbYesNo + vbQuestion, " thong bao") = vbYes Then
DoCmd.SetWarnings False
DoCmd.RunCommand acCmdDeleteRecord
DoCmd.GoToRecord , , acLast
xoa.SetFocus
End If

End Sub
RE: xu li code nut xoa

ongke0711 > 17-06-15, 01:51 PM

Xóa xong Requery cái RecordSource để cập nhật lại.
RE: xu li code nut xoa

maidinhdan > 17-06-15, 05:56 PM

Sửa lại

Mã PHP:
Private Sub xoa_Click() If MsgBox("ban co thuc su muon xoa mau tin nay khong", vbYesNo + vbQuestion, " thong bao") = vbYes Then DoCmd.SetWarnings False DoCmd.RunCommand acCmdDeleteRecord DoCmd.GoToRecord , , acLast Docmd.Requery End If End Sub
Bài trước Bài tiếp