• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Ngăn chặn không cho Access tự động lưu record

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thư viện thủ thuật
  • Ngăn chặn không cho Access tự động lưu record
• Ngăn chặn không cho Access tự động lưu record

• RE: Ngăn chặn không cho Access tự động lưu record

  nmhung49 > 24-03-13, 07:33 PM

  Các bạn có thể dùng sự kiện Update ở MainForm và SubForm để ngăn việc lưu các Record
  Ở Main Form
  

  Mã PHP:

  Private Sub Form_BeforeUpdate(Cancel As Integer)
If MsgBox("Ban co muon save lai khong?", vbYesNo + vbExclamation, "Thu Thuat Access Thong Bao") = vbNo Then
   Cancel = True
   Me.Undo
End If

End Sub 


  Nếu có SubForm thì tiếp tục code trên
  
  

  Mã PHP:

  Private Sub Form_BeforeUpdate(Cancel As Integer)
If MsgBox("Ban co muon save lai khong?", vbYesNo + vbExclamation, "Thu Thuat Access Thong Bao") = vbNo Then
   Cancel = Tru[/code]e
   Me.Undo
End If

End Sub 


• RE: Ngăn chặn không cho Access tự động lưu record

  NganDinhNguyen > 02-05-13, 07:49 PM

  Theo mình ở cái nút close form mình dùng vòng lặp tìm trong table (vd tbHoaDon) xem trong đó có mã Hóa Đơn nào giống với Mã Hóa Đơn trên form không,nếu có rồi thì close form không hỏi có lưu hay không,còn nếu chưa có thì hỏi có lưu hay không, nếu ko lưu thì close form,nếu lưu thì qay lại form lưu (có thiết kế thêm nút lưu)

• RE: Ngăn chặn không cho Access tự động lưu record

  Xuân Thanh > 03-05-13, 10:47 AM

  (02-05-13, 07:49 PM)NganDinhNguyen Đã viết: Theo mình ở cái nút close form mình dùng vòng lặp tìm trong table (vd tbHoaDon) xem trong đó có mã Hóa Đơn nào giống với Mã Hóa Đơn trên form không,nếu có rồi thì close form không hỏi có lưu hay không,còn nếu chưa có thì hỏi có lưu hay không, nếu ko lưu thì close form,nếu lưu thì qay lại form lưu (có thiết kế thêm nút lưu)

  
  Làm như bạn có mà ...toi. Lỡ khi người nhập nhập một lèo khoảng mấy chục mẫu tin rồi mới Close Form thì sao? Tất cả những mẫu tin nhập từ trước đã lưu vào table rồi, Thường thì người ta bắt lỗi ở sự kiện BeforUpdate của form là chính xác nhất, còn nếu bắt lỗi ở nút Hủy thì coi chửng khi chưa kịp nhấn nút Hủy thì nó đã lưu mất rồi
  Thân mến

• RE: Ngăn chặn không cho Access tự động lưu record

  NganDinhNguyen > 03-05-13, 06:09 PM

  Hi, xin lỗi vì đã phát biểu linh tinh, đúng là hôm qa mình có text lại thì thấy chưa kịp lưu thì nó đã lưu mất tiu rùi,cám ơn bạn

• RE: Ngăn chặn không cho Access tự động lưu record

  nhoc77 > 31-10-13, 02:36 PM

  Chào A Xuân Thanh
  Trước tiên cảm ơn hàm của A về "Ngăn không cho Access tự động lưu record" sau nhờ a chỉ dùm thêm:
  1-tôi đã làm đúng như A chỉ nhưng cứ mỗi lần qua 1 record khác làn nó hiện thông báo nhắc nhở rất phiền, có cách nào khắc phục k (ý tôi muốn sau khi nhập thông tin xong, lưu mới hỏi. Chứ mỗi lần nhập mỗi lần hỏi cực lắm)
  
  2- Tôi tạo 1 form "cập nhật khách hàng" & 1 form "thông tin khách hàng"
  ở form "thông tin khách hàng" bao gồm 1 list box những text box. mình có yêu cầu như sau:
  
  1 - khi click vào 1 hàng bất kỳ trong list box thì hiện ra thông tin lên text box (mình làm được rồi)
  
  2 - khi double click vào 1 hàng bất kỳ trong list box thì hiện ra form "cập nhật khách hàng" và hiện ra đúng thông tin mà mình đã double click ở list box (VD nếu mình chọn list box khách hàng tên Nguyễn Văn A thì khi mở form "cập nhật khách hàng" cũng là Nguyễn Văn A
  
  Cảm ơn A

• RE: Ngăn chặn không cho Access tự động lưu record

  vocsiit > 04-11-13, 04:39 PM

  To Xuân Thanh!
  Khi mở form lên thì trong đó có trường STT là Autonumber và các trường khác, mình không nhập gì hết nhưng khi đóng lại thì bị hỏi "The record has changed - do you want to save it? (do trường autonumber thay đổi)
  Xuân Thanh và các bạn có cách nào chương trình khỏi phải hỏi không?
  
  Cảm ơn các bạn nhiều.

• RE: Ngăn chặn không cho Access tự động lưu record

  trangdv.pchg > 20-03-17, 03:33 PM

  Bắt lỗi ở sự kiện BeforUpdate của form là OK nhưng Nếu form có Subform thì khi chuyển sang sửa dữ liệu ở Subform thì nó hiện thông báo trước.
  Theo bạn thì làm sao khi sửa số liệu cả ở Mainform và Subform xong thì mới thông báo là dữ liệu thay đổi?

• RE: Ngăn chặn không cho Access tự động lưu record

  trangdv.pchg > 22-03-17, 01:12 PM

  Mình copy đoạn code ở trang 113 của bạn thì khi chạy nó báo lỗi
  Private Sub Form_Load()
  Dim obj As AccessObject, dbs As Object
  Dim strList As String
  Set dbs = Application.CurrentProject
  For Each obj In dbs.AllReports
      strList = strList & obj.Name & ";"
  Next obj
  cboReports.RowSourceType = "Value List"
  cboReports.RowSource = strList
  End sub
  Mình chẳng hiểu kiểu gì. Bạn giúp mình chút.
  Không hiểu khi chuyển sang Subform là nó thông báo ngay là Dữ liệu Mainform thay đổi
• Bài trước Bài tiếp