-
05-28-2010, 04:17 PM #1Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 1
Tắt thông báo xóa Record hay action query
Các bác cho mình hỏi
- Khi mình xóa một record trên form, access hiện thông báo: "Are you sure you want to delete these records?" Làm sao mình có thể tắt thông báo này và thay thế bằng thông báo theo ý mình vậy ?
- Hay khi mình thực thi một action query thì access cũng hiện thông báo hỏi có muốn thực thi không?
Bác nào biết cách làm bày cho mình với. Thanks nhiều lắm.View more random threads:
- Thêm ảnh chân dung cho từng ID.
- Lỗi access 2003 khi chạy trên 2007
- xin hỏi cách tìm record giống nhau giữa hai table
- Code Mở phím Shift bị lỗi
- Sử dụng hàm xây dựng như thế nào?
- Chuyên đề ứng dụng : Thiết kế chương trình Sổ Quỹ Tiền Mặt(Phần 3 - File đ1nh kèm)
- Gọp các Textbox mà có dữ liệu giống nhau
- Hỏi cách viết 1 hàn function tính điểm TB
- Cho mình hỏi về Access 2007 Runtime ?
- Hỏi về cách tô màu từ tìm kiếm và mở 1 form mới từ form trước đó
-
05-28-2010, 05:27 PM #2Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Tắt thông báo xóa Record hay action query
Gửi bởi bchip
Thân
-
05-28-2010, 05:46 PM #3Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Tắt thông báo xóa Record hay action query
Gửi bởi bchip
Response = acDataErrContinue
If MsgBox("Co chac chac xoa khong?", vbYesNo+vbDefaultButton2+vbQuestion, "Xac nhan xoa")=vbNo Then
Cancel = True
End If
Với action query thì có thể tắt bằng cách gọi nó trong code hoặc trong macro. Trước khi chạy nó, cho chạy một macro: SetWarnings với thông số Warning On là Yes.
VD: viết trong một thủ tục thích hợp đoạn sau:
DoCmd.SetWarnings True
DoCmd.OpenQuery "tên query action"
DoCmd.SetWarnings False
-
05-28-2010, 06:10 PM #4Silver member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Tắt thông báo xóa Record hay action query
Gửi bởi xuanthanh
Gửi bởi phatnq2002
Mới bắt đầu làm lập trình mà được anh Phat giúp đở kiểu này thì còn gì bằng. Chỉ khó là em ở cách SG gần 200km, chứ nếu không em đã mời anh làm một chầu hậu hỉn rùi...:k5041412:
P/s: Àh ! anh cho em xin số phone với, sẽ có lúc em lên SG đấy...:bdance:
-
05-28-2010, 11:49 PM #5Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Tắt thông báo xóa Record hay action query
Gửi bởi phatnq2002
Mã:Private Sub cmdXoa_Click() DoCmd.SetWarnings False If MsgBox("Bạn có chắc chắn xóa", vbYesNo, "Xác nhận") = vbYes Then DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 End If DoCmd.SetWarnings True End Sub
Gửi bởi phatnq2002
Volkswagen Touareg được nhập cảng từ nhà máy Bratislava ở Slovakia, nơi duy nhất lắp ráp mẫu xe này, cùng với sản phẩm hạng sang Audi Q7 và Porsche Cayenne. Bộ ba sản phẩm lovense lush "anh em" là...
SUV "khủng bố" chiếm thế phân khúc xe sang cho phái mạnh