Thêm Nhiều Record Chỉ Bằng Một Nút Nhấn

Thế thì chỉ cần run câu lệnh SQL là được.
Private Sub cmdKC_Click()

DoCmd.SetWarnings False
Form_frmDM1.Requery
DoCmd.RunSQL ("SELECT tblDM1.ID, tblDM1.Ten, tblDM1.Ghichu INTO tblDM2 FROM tblDM1")
DoCmd.SetWarnings True

End Sub
Nhấn để mở rộng...

Đây là trường hợp mình chỉ làm đơn giản thôi nha bạn. Bạn nào có cách gì hay hơn thì xin nêu ra nhé!

PS: Cho đính chính cái nha! Mình là con gái hổng phải con chai. Hihihi
 
Sửa lần cuối:
Hỏi về giải đáp của copy nhiều record

Tui có xem câu lệnh query mà bạn Spamail gởi để chỉ cách copy nhiều record khi click vào 1 nút lệnh trên form.
Nhưng bạn bạn ơi việc chạy query nhiều lần sẽ làm cho số record từ bảng 1 sẽ được copy trùng lắp nhiều lần vào table 2.
Vì thế nếu ý tác giả hỏi bạn yêu cầu mỗi lần lick nút lệnh thì trong table 2 chỉ chứa duy nhất 1 lần những record của table 1 thôi. Nếu ý tác giả hỏi bạn muốn đúng như vậy thì bạn phải có lệnh xoá nội dung table 2 trước rồi mới thực hiện câu lệnh copy được.
Còn nếu ý tác giả muốn copy thêm những record trong table 2 vào table 1 (table 1 đã có những record khác rồi) thì bạn phải có những lệnh so trùng xem những record trong table 2 đã có trong table 1 chưa. Nếu chưa có thì copy vào. Nếu có rồi thì xoá record đó đi rồi copy vào record mới tương ứng trong table 2 (vì có thể nội dung record trong table 2 thay đổi trong khi nó tương ứng ở table 1 là cũ).

Mai góp ý với bạn vậy nhé. Chào bạn
 
hoangmai2605 nói:
Tui có xem câu lệnh query mà bạn Spamail gởi để chỉ cách copy nhiều record khi click vào 1 nút lệnh trên form.
Nhưng bạn bạn ơi việc chạy query nhiều lần sẽ làm cho số record từ bảng 1 sẽ được copy trùng lắp nhiều lần vào table 2.
Vì thế nếu ý tác giả hỏi bạn yêu cầu mỗi lần lick nút lệnh thì trong table 2 chỉ chứa duy nhất 1 lần những record của table 1 thôi. Nếu ý tác giả hỏi bạn muốn đúng như vậy thì bạn phải có lệnh xoá nội dung table 2 trước rồi mới thực hiện câu lệnh copy được.
Còn nếu ý tác giả muốn copy thêm những record trong table 2 vào table 1 (table 1 đã có những record khác rồi) thì bạn phải có những lệnh so trùng xem những record trong table 2 đã có trong table 1 chưa. Nếu chưa có thì copy vào. Nếu có rồi thì xoá record đó đi rồi copy vào record mới tương ứng trong table 2 (vì có thể nội dung record trong table 2 thay đổi trong khi nó tương ứng ở table 1 là cũ).

Mai góp ý với bạn vậy nhé. Chào bạn
Nhấn để mở rộng...

Cám ơn bạn đã cho ý kiến. Câu lệnh mình đưa ra thực chất là câu lệnh copy toàn bộ record tblDM1 sang bảng mới là tblDM2, bạn nên biết ở đây tblDM2 khi thực thi câu SQL đó là nó đồng thời đc tạo ra chứ k phải là bảng tạo sẵn rồi sẽ copy dư liệu đâu bạn ạ. Không hề có record nào trùng lặp ở tblDM2 ở đây cả.
1. Nếu bảng tblDM2 đã tồn tại (đã có) thì nó sẽ tạo bảng tblDM2 mới và đè lên bảng tblDM2 cũ
2. Nếu bảng tblDM2 chưa có thì nó sẽ tạo ra bảng tblDM2 mới
Bạn thử bỏ dòng DoCmd.SetWarnings False và DoCmd.SetWarnings True đi. Khi đó sẽ có bảng Warning nhắc nhở bạn là có muốn copy hết records ở tblDM1 sang New table (tblDM2) hay k?

Thân chào.
 
Sửa lần cuối:
Cảm ơn anh/chị.
Em cũng có một giải pháp khác bằng cách dùng kiểu AddNew, file minh hoạ đây ạ: http://www.4shared.com/file/75435706/ec4df8f/101220082.html

Trên đây chỉ là minh hoạ thôi, nhưng để đảm bảo rằng không bì trùng record khi nó đã có trong tblChiTiet rồi thì em có tạo thêm tblNhatKyQuy, trong đó nếu Isnull(Số chứng từ) thì mới AddNew vào tblChiTiet, từ đêtm Totals cái ông tblChiTiet để làm phát sinh hằng ngày,.... tức là để hoàn thành được công việc em phải làm nhiều việc khác nữa.

Em mong nhận được sự góp ý của anh chị vì em làm rườm rà và mất thủ công nhiều quá.
 
Bạn phải đăng nhập hoặc đăng ký để bình luận.

Liên kết

Tâm An kế toán quản trị

Chia sẻ trang

Back
Top