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

Xin hướng dẫn cách Copy một record trong form !

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • [Help] Xin hướng dẫn cách Copy một record trong form !
• Xin hướng dẫn cách Copy một record trong form !

• Xin hướng dẫn cách Copy một record trong form !

  daiphong1979 > 21-08-12, 11:56 AM

  Mình có làm một form để nhập dữ liệu, tương ứng mỗi lần nhập là add thêm 1 record trong một bản ! Để tránh mất thời gian khi nhập những dữ liệu gần giống nhau mình đã sưu tầm được code để tạo một nút copy toàn bộ form và chỉ việc chỉnh sửa chút đỉnh bấm nút lưu là xong.
  Tuy nhiên em bị rắc rối nhỏ là do có chọn khóa chính và chọn No duplicate, nên khi copy toán bộ form là bị lỗi ngay (nếu chọn no duplicate thì k bị ).
  
  Nay nhờ các bạn hướng dẫn, làm cách nào khi copy sẽ loại trừ filed có khóa chính ra không ạ )vì field có khóa chính có thể nhập mới.
  
  Code của lệnh copy của em :
  
  Private Sub Command75_Click()
  On Error GoTo Err_Command75_Click
  DoCmd.RunCommand acCmdSelectRecord
  DoCmd.RunCommand acCmdCopy
  DoCmd.RunCommand acCmdRecordsGoToNew
  DoCmd.RunCommand acCmdSelectRecord
  DoCmd.RunCommand acCmdPaste
  Exit_Command75_Click:
  Exit Sub
  Err_Command75_Click:
  MsgBox Err.Description
  Resume Exit_Command75_Click
  
  End Sub

• RE: Xin hướng dẫn cách Copy một record trong form !

  daiphong1979 > 21-08-12, 05:59 PM

  Các bạn ơi, giúp mình với nhé !

• RE: Xin hướng dẫn cách Copy một record trong form !

  Noname > 21-08-12, 06:31 PM

  Với đoạn code trên thì không được! Nó tương đương với việc bạn tô đen một dòng, nhảy đến cuối bảng datasheet, paster vào vậy! Nếu trùng khóa thì sẽ bị báo duplicate!
  
  bạn nên chuyển hướng khác!
  Ví dụ:
  1/Lưu các field hiện hành vào các biến
  2/Tạo 1 record mới
  3/Gán các giá trị được lưu vào record mới!
  
  
  **
  **
  Một
  Cách khác là bạn dùng query append record hiện tại cho chính table của bạn, trừ Khóa chính thì được đổi, và sửa sau
  
  Ví dụ:
  

  Mã:

  INSERT INTO Article ( ArticleId, SubCatId, Title, Summary )
SELECT "IDtemp" AS Expr1, Article.SubCatId, Article.Title, Article.Summary
FROM Article;

  
  Sau đó mở record có ID là IDTemp đó lên sửa số ID lại
• Bài trước Bài tiếp