Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Xin hướng dẫn cách Copy một record trong form !
#1
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
Chữ ký của daiphong1979 Này gió ơi cho ta nhờ chút việc,
Việc nhỏ thôi nhưng là cả tấm lòng,
Khi gió về nép bên cạnh người ấy,
Gió thì thầm ta nhớ ấy biết bao.

Reply
Những người đã cảm ơn
#2
Các bạn ơi, giúp mình với nhé !
Chữ ký của daiphong1979 Này gió ơi cho ta nhờ chút việc,
Việc nhỏ thôi nhưng là cả tấm lòng,
Khi gió về nép bên cạnh người ấy,
Gió thì thầm ta nhớ ấy biết bao.

Reply
Những người đã cảm ơn
#3
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
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn daiphong1979 , Cafe Via He


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Tự động hiện Form khi loading hết thời gian ChiMai 1 20 9 Giờ trước
Bài mới nhất: ongke0711
Photo [Hỏi] Mở Form trên access 2007 báo lỗi jason 5 186 22-11-16, 09:23 AM
Bài mới nhất: jason
  Query hiện lên trên form? feeling 4 160 09-11-16, 09:49 PM
Bài mới nhất: toancvp
  [Help] Chỉnh giúp Form thống kê hoanghai902 2 122 28-10-16, 06:15 PM
Bài mới nhất: hoanghai902
  [Help] Dòng chữ chạy trên form báo đến ngày sinh nhật tronghieu9792 1 121 20-10-16, 09:30 AM
Bài mới nhất: lamvankhanh

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ