Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Ngăn chặn không cho lưu record vào table
#1
Như đã một lần trao đổi, nếu nguồn của một form là table thì khi cập nhật dữ liệu trên form nó sẽ tự động lưu vào table. Nếu bạn muốn có một cảnh báo trước khi lưu thì dùng sự kiện Form_BeforUpdate sau đây
Mã PHP:
Private Sub Form_BeforeUpdate(Cancel As Integer)
    
Dim strMsg As String
    strMsg 
"Data has changed."
    
strMsg strMsg "@Do you wish to save the changes?"
    
strMsg strMsg "@Click Yes to Save or No to Discard changes."
    
If MsgBox(strMsgvbQuestion vbYesNo"Save Record?") = vbYes Then
        
'Do Nothing
    Else
        DoCmd.RunCommand acCmdUndo       
    End If
End Sub 
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Noname , haquocquan
#2
Giờ mình có nút button thoát khỏi chương trình khi ấn vào nó sẽ hiển thị câu cảnh báo
Bạn có chắc chắn thoát không?
Nếu bấm đồng ý thì thoát còn không ấn đồng ý thì không thoát.
Làm có tương tự như thế này ko bạn?
Thanks!
Chữ ký của casio262 http://lequang.vn
Reply
Những người đã cảm ơn
#3
(26-04-12, 04:26 PM)casio262 Đã viết: Giờ mình có nút button thoát khỏi chương trình khi ấn vào nó sẽ hiển thị câu cảnh báo
Bạn có chắc chắn thoát không?
Nếu bấm đồng ý thì thoát còn không ấn đồng ý thì không thoát.
Làm có tương tự như thế này ko bạn?
Thanks!

Mã PHP:
Private Sub cmdThoat_click()
     If 
MsgBox("Ban co chac chan muon thoat"vbQuestion vbYesNo"Thoat chuong trinh") = vbYes then
          Docmd
.Quit
     End 
If
End Sub 
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Tạo Menu dạng TreeView bằng Query (không dùng ActiveX) ongke0711 4 267 06-12-16, 09:16 PM
Bài mới nhất: toancvp
  [Hỏi] Lỗi khi dùng CSDL qua Link Table xndt 5 231 28-09-16, 08:22 AM
Bài mới nhất: xndt
  Không cho phép điều chỉnh kích thước của Form ChiMai 1 129 18-09-16, 01:27 PM
Bài mới nhất: ongke0711
  Xin giúp tạo 1 trường trong table đánh số tự động thay cho autonumber trungminh 7 450 16-09-16, 05:17 PM
Bài mới nhất: maidinhdan
  Không cho phép click phải chuột trên form ChiMai 2 144 03-09-16, 09:33 PM
Bài mới nhất: ongke0711

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ