[email protected] Tín đồ Access   Bài viết: 100 Chủ đề: 30 Tham Gia: 23-01 -19 Điểm danh tiếng: 0 Số lần cảm ơn 19 9 cảm ơn trong 9 bài Tiền Access: 2,293.02Ac$ #1 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 Chữ ký của [email protected] [email protected],gia nhập Thủ Thuật Access từ 23-01 -19 Website Find Reply Những người đã cảm ơn ongke0711 Honorary members    Bài viết: 3,578 Chủ đề: 62 Tham Gia: 10-04 -15 Điểm danh tiếng: 165 Số lần cảm ơn 584 4063 cảm ơn trong 2402 bài Tiền Access: 92,558.56Ac$ #2 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. Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake! ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ Website Find Reply Những người đã cảm ơn [email protected] Tín đồ Access   Bài viết: 100 Chủ đề: 30 Tham Gia: 23-01 -19 Điểm danh tiếng: 0 Số lần cảm ơn 19 9 cảm ơn trong 9 bài Tiền Access: 2,293.02Ac$ #3 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 ạ Chữ ký của [email protected] [email protected],gia nhập Thủ Thuật Access từ 23-01 -19 Website Find Reply Những người đã cảm ơn ongke0711 Honorary members    Bài viết: 3,578 Chủ đề: 62 Tham Gia: 10-04 -15 Điểm danh tiếng: 165 Số lần cảm ơn 584 4063 cảm ơn trong 2402 bài Tiền Access: 92,558.56Ac$ #4 09-07-21, 03:50 PM (Được chỉnh sửa: 09-07-21, 04:09 PM bởi ongke0711.) (09-07-21, 02:45 PM)[email protected] Đã 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 &. '" Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake! ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ Website Find Reply Những người đã cảm ơn [email protected] Tín đồ Access   Bài viết: 100 Chủ đề: 30 Tham Gia: 23-01 -19 Điểm danh tiếng: 0 Số lần cảm ơn 19 9 cảm ơn trong 9 bài Tiền Access: 2,293.02Ac$ #5 09-07-21, 04:59 PM (Được chỉnh sửa: 09-07-21, 05:01 PM bởi [email protected].) Em đã làm thữ nhưng không dc ạ. Anh có thể chỉ giúp em k Chữ ký của [email protected] [email protected],gia nhập Thủ Thuật Access từ 23-01 -19 Website Find Reply Những người đã cảm ơn tranthanhan1962 Thành viên đẳng cấp    Bài viết: 2,376 Chủ đề: 86 Tham Gia: 30-10 -14 Điểm danh tiếng: 121 Số lần cảm ơn 702 2955 cảm ơn trong 1577 bài Tiền Access: 63,702.42Ac$ #6 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 Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ Website Find Reply Những người đã cảm ơn maidinhdan ongke0711 Honorary members    Bài viết: 3,578 Chủ đề: 62 Tham Gia: 10-04 -15 Điểm danh tiếng: 165 Số lần cảm ơn 584 4063 cảm ơn trong 2402 bài Tiền Access: 92,558.56Ac$ #7 09-07-21, 07:50 PM (09-07-21, 04:59 PM)[email protected] Đã 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 Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake! ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ Website Find Reply Những người đã cảm ơn maidinhdan , tranthanhan1962 doandinhtam Tín đồ Access   Bài viết: 101 Chủ đề: 17 Tham Gia: 15-12 -16 Điểm danh tiếng: 0 Số lần cảm ơn 16 9 cảm ơn trong 9 bài Tiền Access: 2,022.15Ac$ #8 18-07-21, 07:29 PM (Được chỉnh sửa: 18-07-21, 09:01 PM bởi doandinhtam.) 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 Chữ ký của doandinhtam doandinhtam,gia nhập Thủ Thuật Access từ 15-12 -16. Website Find Reply Những người đã cảm ơn |