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

Bỏ lưu dữ liệu trên sub form

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • [Hỏi] Bỏ lưu dữ liệu trên sub form
• Bỏ lưu dữ liệu trên sub form

• Bỏ lưu dữ liệu trên sub form

  longkd_bvct@yahoo.com.vn > 09-07-21, 11:04 AM

  Chào mọi người ạ. em làm 1 form nhập liệu dạng main sub. Vấn đề là em viết code cho nút "Bỏ qua" khi không muốn lưu dữ liệu 
  . Nhưng chỉ không lưu khi nhập dữ liệu trên main form. còn khi nhập dữ liệu lên sub form thỉ không bỏ lưu dữ liệu được. form dạng boundform ạ. nhờ mọi người xem giúp
  
  
  https://drive.google.com/file/d/1-uN9nLK...sp=sharing

• RE: Bỏ lưu dữ liệu trên sub form

  ongke0711 > 09-07-21, 11:56 AM

  Tôi thấy bạn đã thiết lập Relationship giữa table NhapHoaDon và ChitietHD có luôn tuỳ chọn "Cascading Delete" thì tận dụng nó luôn.
  Khi bấm nút [bỏ qua] thì chạy code xoá cái số HD trên MainForm khi đó nội dung trong SubForm cũng tự động xoá luôn do tính năng trên.

• RE: Bỏ lưu dữ liệu trên sub form

  longkd_bvct@yahoo.com.vn > 09-07-21, 02:45 PM

  (09-07-21, 11:56 AM)ongke0711 Đã viết: Tôi thấy bạn đã thiết lập Relationship giữa table NhapHoaDon và ChitietHD có luôn tuỳ chọn "Cascading Delete" thì tận dụng nó luôn.
  Khi bấm nút [bỏ qua] thì chạy code xoá cái số HD trên MainForm khi đó nội dung trong SubForm cũng tự động xoá luôn do tính năng trên.

  
  Em cũng đã làm theo cách đó, nhưng nó phát sinh lỗi là khi thêm mà không nhập gì khi khi bỏ qua nó thông báo lõi ạ

• RE: Bỏ lưu dữ liệu trên sub form

  ongke0711 > 09-07-21, 03:50 PM

  (09-07-21, 02:45 PM)longkd_bvct@yahoo.com.vn Đã viết:

  (09-07-21, 11:56 AM)ongke0711 Đã viết: Tôi thấy bạn đã thiết lập Relationship giữa table NhapHoaDon và ChitietHD có luôn tuỳ chọn "Cascading Delete" thì tận dụng nó luôn.
  Khi bấm nút [bỏ qua] thì chạy code xoá cái số HD trên MainForm khi đó nội dung trong SubForm cũng tự động xoá luôn do tính năng trên.

  
  Em cũng đã làm theo cách đó, nhưng nó phát sinh lỗi là khi thêm mà không nhập gì khi khi bỏ qua nó thông báo lõi ạ

  
  Bạn đã xác được được lỗi đó là do không có dữ liệu thì bẫy nó, để code nó vẫn chạy tiếp.
  Bạn cần phân tích thật kỹ các bước thao tác trong Form nhập liệu này để bẫy lỗi và code cho phù hợp từng trường hợp có thể phát sinh.
  - Nếu chỉ đang nhập liệu trên MainF, chưa bấm chuột vào SubF thì hiện trạng lưu dữ liệu sẽ khác. Lúc này dữ liệu chưa lưu xuống table NhapHoaDon --> khi đó muốn xoá thì chỉ cần Undo hoặc gán rỗng cho các Textbox trên SubF.
  - Nếu đã lỡ bấm con trỏ vào SubF rồi thì dữ liệu trên MainF đã lưu xuống Table --> khi đó phải dùng câu lệnh SQL "Delete * From NhapHoaDon Where SoHD ='" & me.SoHD &. '"

• RE: Bỏ lưu dữ liệu trên sub form

  longkd_bvct@yahoo.com.vn > 09-07-21, 04:59 PM

  Em đã làm thữ nhưng không dc ạ. Anh có thể chỉ giúp em k

• RE: Bỏ lưu dữ liệu trên sub form

  tranthanhan1962 > 09-07-21, 06:47 PM

  Mặc định form access khi có record sorce là ràng buột với nguồn table hoặc select query. Sau khi record mới được nhập và chưa di chuyển ra khỏi khu vực record lúc này record chưa ghi lên nguồn table (not fresh), Vì vậy lệnh undo sẽ phục hồi tình trạng trước (chưa tạo ra record, việc các textbox bị xóa trắng không phải bị delete mà là trả về giá trị rỗng trước khi nhập dữ liệu, việc này chưa hề liên quan đến nguồn của record source). Khi con trỏ rời khỏi record tự động form sẽ refresh ghi record đó lên table mà không cần đến lệnh Lưu <DoCmd.RunCommand acCmdSaveRecord> cho nên lệnh này là thừa trong Bound Form.
  Vì vậy trong code lệnh Bỏ qua <acCmdUndo> không có tác dụng với 1 record đã được ghi lên table. Lúc này phải sử dụng lệnh <acCmdDeleteRecord> mới được

• RE: Bỏ lưu dữ liệu trên sub form

  ongke0711 > 09-07-21, 07:50 PM

  (09-07-21, 04:59 PM)longkd_bvct@yahoo.com.vn Đã viết: Em đã làm thữ nhưng không dc ạ. Anh có thể chỉ giúp em k

  
  Code:
  
  

  Mã PHP:

  Private Sub cmdboquahd_Click()
    DoCmd.SetWarnings False
    On Error Resume Next
    If Me.Dirty = False Then
        DoCmd.RunCommand acCmdDeleteRecord
    Else
        DoCmd.RunCommand acCmdUndo
    End If
    
    Me.Requery
    DoCmd.GoToRecord , , acLast
    lockcontrolshd True
    DoCmd.SetWarnings True
    
End Sub 


• RE: Bỏ lưu dữ liệu trên sub form

  doandinhtam > 18-07-21, 07:29 PM

  Bạn làm 1 event after update trong subform hỏi có lưu dữ liệu không. Nếu đồng ý thì lưu, ko đồng ý thì sử dụng lệnh me.undo
• Bài trước Bài tiếp