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

Button không lưu nhưng vẫn bị lưu

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • [Help] Button không lưu nhưng vẫn bị lưu
• Button không lưu nhưng vẫn bị lưu

• Button không lưu nhưng vẫn bị lưu

  letnhi > 10-03-20, 08:04 AM

  Mình có 1 form chính có subform. Sau khi nhập một số thông tin form chính rồi đến subform sau đó quay ra form chính nhập thêm một số thông tin nữa . Cuối cùng nhấn button  "không lưu" nhưng nó vẫn lưu số liệu nhập từ subform và dữ liệu form chính trước khi nhập subform còn dữ liệu form chính sau khi nhập subform nó không lưu ( button "không lưu"  được thiết kế từ wizard và cả viết code )
  Private Sub Khong_Click()
  
      DoCmd.RunCommand acCmdUndo
      DoCmd.GoToRecord , , acFirst
  
  end sub
  Anh chị em giúp mình xử lý vấn đề này đi. Cảm ơn nhiều.

• RE: Button không lưu nhưng vẫn bị lưu

  thuyyeu99 > 10-03-20, 11:22 AM

  (10-03-20, 08:04 AM)letnhi Đã viết: Mình có 1 form chính có subform. Sau khi nhập một số thông tin form chính rồi đến subform sau đó quay ra form chính nhập thêm một số thông tin nữa . Cuối cùng nhấn button  "không lưu" nhưng nó vẫn lưu số liệu nhập từ subform và dữ liệu form chính trước khi nhập subform còn dữ liệu form chính sau khi nhập subform nó không lưu ( button "không lưu"  được thiết kế từ wizard và cả viết code )
  Private Sub Khong_Click()
  
      DoCmd.RunCommand acCmdUndo
      DoCmd.GoToRecord , , acFirst
  
  end sub
  Anh chị em giúp mình xử lý vấn đề này đi. Cảm ơn nhiều.

  Mình đọc mà không hiểu gì hết, bạn có cái File demo không gởi lên đây.

• RE: Button không lưu nhưng vẫn bị lưu

  Xuân Thanh > 10-03-20, 11:26 AM

  Tham khảo ở đây
  https://thuthuataccess.com/forum/thread-5350.html

• RE: Button không lưu nhưng vẫn bị lưu

  dotrung > 11-03-20, 10:52 PM

  Thường dùng vba code delete 2 record trên form luôn là dễ nhất mà bạn. 
  
  Khó chỗ đã lưu record rồi, đem sửa nhưng không lưu.
  
  => giải pháp của mình là copy record chuẩn bị sửa đó ra table temp. chọn lưu thì xóa temp, không lưu thì phục hồi record từ temp. Tuy hơi rườm rà nhưng an toàn nhất.

• RE: Button không lưu nhưng vẫn bị lưu

  letnhi > 12-03-20, 10:04 AM

  (11-03-20, 10:52 PM)dotrung Đã viết:  
  Thường dùng vba code delete 2 record trên form luôn là dễ nhất mà bạn. 
  
  Khó chỗ đã lưu record rồi, đem sửa nhưng không lưu.
  
  => giải pháp của mình là copy record chuẩn bị sửa đó ra table temp. chọn lưu thì xóa temp, không lưu thì phục hồi record từ temp. Tuy hơi rườm rà nhưng an toàn nhất.

  
  Cảm ơn bạn rất nhiều. Vậy phải tạo ra 2 table temp 1 dành cho form chính và 1 dành cho subform thật hơi khó. Nhưng có lẽ đây là phương pháp duy nhất quá. Một lần nữa cảm ơn bạn.

• RE: Button không lưu nhưng vẫn bị lưu

  ongke0711 > 12-03-20, 12:50 PM

  (12-03-20, 10:04 AM)letnhi Đã viết:

  (11-03-20, 10:52 PM)dotrung Đã viết:  
  Thường dùng vba code delete 2 record trên form luôn là dễ nhất mà bạn. 
  
  Khó chỗ đã lưu record rồi, đem sửa nhưng không lưu.
  
  => giải pháp của mình là copy record chuẩn bị sửa đó ra table temp. chọn lưu thì xóa temp, không lưu thì phục hồi record từ temp. Tuy hơi rườm rà nhưng an toàn nhất.

  
  Cảm ơn bạn rất nhiều. Vậy phải tạo ra 2 table temp 1 dành cho form chính và 1 dành cho subform thật hơi khó. Nhưng có lẽ đây là phương pháp duy nhất quá. Một lần nữa cảm ơn bạn.

  
  Giải pháp của bạn DoTrung cũng hợp lý rồi đó. 
  Cũng có mấy cách không dùng table tạm, tuỳ vào cách thức thiết kế Main form - Subform của bạn.
  - Dùng Unbound Form toàn bộ.
  - Hoặc Bound Form có Link Master/Child field.
  - Không có Link Master/Child field.
  
  Nếu bạn có sẳn cái dữ liệu và form mẫu thì tôi làm demo nhanh cho các bạn tham khảo.

• RE: Button không lưu nhưng vẫn bị lưu

  letnhi > 19-03-20, 10:46 AM

  Mình đã đọc bài của ông kẹ và download về đọc mà sao thấy khó quá. Mình gởi bài mẫu của mình lên đây và xin các bạn làm demo trên bài mẫu này bằng phương pháp nào cũng được . Cảm ơn rất nhiều.
  https://drive.google.com/file/d/1K-yqEqq...sp=sharing

• RE: Button không lưu nhưng vẫn bị lưu

  dotrung > 19-03-20, 11:14 AM

  Bài viết của anh Ongke rất hay, hồi đó mình học acces không nhiều nên chưa biết
  
  file mẫu của mình làm, có gửi lên diễn đàn rồi, bạn có thể tham khảo code nhé
  
  https://thuthuataccess.com/forum/thread-...age-2.html

• RE: Button không lưu nhưng vẫn bị lưu

  ongke0711 > 20-03-20, 02:34 PM

  (19-03-20, 10:46 AM)letnhi Đã viết: Mình đã đọc bài của ông kẹ và download về đọc mà sao thấy khó quá. Mình gởi bài mẫu của mình lên đây và xin các bạn làm demo trên bài mẫu này bằng phương pháp nào cũng được . Cảm ơn rất nhiều.
  https://drive.google.com/file/d/1K-yqEqq...sp=sharing

  
  Nhìn các Table của bạn là biết bạn phải ngâm cứu cơ bản lại nhiều. Thiết lập kiểu dữ liệu từng Field cho phù hợp. Các Field lưu tiền, số lượng mà bạn cứ để kiểu ShortText là tiêu rồi.
  Tiền: Double
  Số lượng: Double nếu có số lẻ.
  Tỷ lệ: dạng Number - Percent.
  ...
  - Tập thói quen đặt tên các đối tượng trong Access có các ký tự tiền tố để phân biệt đâu là Table, đâu là Query hay Form. Cái này giúp bạn code VBA chính xác hơn khi tham chiếu đến các đối tượng này.
  - Đặt tên các control trên Form: textbox, nút lênh.
  
  Trong thực tế thiết kế ứng dụng, Form này có liên quan đến form khác chứ không phải có 1 Form độc lập kiểu Main - Sub như bạn yêu cầu xử lý. Tôi làm ở đây chỉ để bạn học hỏi, áp dụng lý thuyểt thôi chứ không có tính thực tế đâu.
  Ví dụ: hiện bạn đang dùng 1 form (main- sub) để xem, duyệt qua các records của table MuaHang. Nếu sau này table này lên đến vài trăm, vài ngàn dòng thì bạn xem kiểu gì? bấm chuột hay phím mũi tên rã tay để di chuyển qua các records?
  
  Demo dưới đây tôi dùng Bound Form như bạn đã làm quen cùng với Table tạm để xử lý trường hợp Sửa - Lưu- Huỷ Lưu đối với Subform dạng Datasheet (hoặc Continuous). Tôi ghi chú rõ trong code, bạn từ từ đọc hiểu code, xem từng chi tiết tôi thiết kế trên Form, đó là các chuẩn hoá cơ bản bạn phải biết để còn đi tiếp.
  Kỹ thuật tôi dùng ở Form này là khi bấm nút [Thêm] hoặc [Sửa] là sẽ chuyển Record Source của cả Mainform và Subfỏm sang Table tạm hết để từ đó: 
  - Nếu muốn Lưu thì sẽ dùng lệnh Insert dữ liệu từ table tạm sang table chính.
  - Nếu muốn Huỷ thì khỏi cần làm gì cả chỉ cần trả Record Source của Form về lại Table chính,  xoá nội dung Table tạm đi cho nhẹ file.
  - Nếu [Sửa] thì cũng load dữ liệu từ Table chính sang Table tạm với điều kiện chỉ lấy dữ liệu của [mact] tương ứng. Khi Lưu thì chạy lệnh UPDATE...
  
  
  
  Link demo (đã sửa): http://www.mediafire.com/file/hevgqhtxk4...accdb/file

• RE: Button không lưu nhưng vẫn bị lưu

  tranthanhan1962 > 20-03-20, 05:59 PM

  (19-03-20, 10:46 AM)letnhi Đã viết: Mình đã đọc bài của ông kẹ và download về đọc mà sao thấy khó quá. Mình gởi bài mẫu của mình lên đây và xin các bạn làm demo trên bài mẫu này bằng phương pháp nào cũng được . Cảm ơn rất nhiều.
  
  https://drive.google.com/file/d/1K-yqEqq...sp=sharing

  ongke0711 góp ý cho bạn rất đúng. Bạn cần nắm vững lại phần kiểu dữ liệu, ngoài ra cũng phải nắm một số kỹ thuật khi viết access chứ không phải phang đại như bên excel. Khi sử dụng Bound Form trong access giá trị dữ liệu tự động được cập nhật ngay vào table (trừ trường hợp bị lỗi) mà không cần phải lưu. Muốn giá trị đó không cập nhật vào bảng bạn phải xoá nó. Code Undo chỉ xử lý được record đang nhập hoặc mới nhập, mà thường ít ai viết nó. Thay vì viết nó thì chỉ cần Ctrl+Z vài cái là xong. Viết code xoá record thì record mới hay cũ đều xử lý được.
  Code Undo của bạn:
  Private Sub Khong_Click()
  
      DoCmd.RunCommand acCmdUndo
      DoCmd.GoToRecord , , acFirst
  End sub
  Không chuẩn, trường hợp bạn chỉ có 1 record mà bấm vào nút này sẽ bị lỗi ngay, vì có record nào mà acFirst. Nếu đây là code dùng được thì nó phải là:
  Private Sub Khong_Click()
  On Error GoTo BiLoi
      DoCmd.RunCommand acCmdUndo
      DoCmd.GoToRecord , , acFirst
  BiLoi:
  End Sub
  Để trường hợp 1 record bị xoá đi và không còn record nào thì nó sẽ bỏ qua lỗi.
• Bài trước Bài tiếp