Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Hỏi code check 1 record tồn tại trong bảng sử dụng ADO
#1
Các pác cho tôi hỏi code check 1 record tồn tại trong bảng sử dụng ADO (dùng trong Access Project) để cập nhật mới nếu chưa tồn tại record này, ngược lại không cập nhập. Cụ thể như sau:
Tôi có table A (ID (primary key), TENHV, NGAYSINH, GIOI TINH, DIACHI) & table B cũng bao gồm các trường trên. Tôi muốn gộp 2 table này lại với nhau bằng Tuy nhiên, 2 table này có những record trùng nhau. Làm thế nào để gộp 2 table A & B lại với nhau sử dụng ADO? Bác nào có kinh nghiệm xin vui lòng chỉ giúp.
Xin cảm ơn nhiều!

P/S: Tôi đã sử dụng code sau và đương nhiên bị báo lỗi nếu có 2 record trùng nhau ở 02 table:
------------------------------------------------------
Private Sub Bosunghocvien_Click()
Dim stDocName as String


'Set warning off
DoCmd.SetWarnings False

stDocName = "SP_Danhsachhocvien"

DoCmd.OpenStoredProcedure stDocName, acViewNormal, acEdit = 1

'Set warning on
DoCmd.SetWarnings True

MsgBox "Da bo sung danh sach hoc vien moi", vbOKOnly, "Thong bao"

End Sub
------------------------------------
Chữ ký của dannynguyen1980 Xin chào, mình là dannynguyen1980, Tham gia http://thuthuataccess.com/forum từ ngày 14-09 -11.
Reply
Những người đã cảm ơn thucgia
#2
Ý tưởng để biết record tồn tại hay không là bạn tạo 1 query với các điều kiện tương ứng, nếu query có record count >0 thì có tồn tại, ngược lại thì bạn dùng lệnh update được rồ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 haquocquan , dannynguyen1980
#3
Đơn giản bạn dùng APPEND là xong. Vì bạn có ID là primary, nó sẽ không append những record đã trùng ID.
Chữ ký của haquocquan Guest, you are welcome!
ღღღღღTài sản của haquocquan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn dannynguyen1980 , thucgia
#4
(02-01-12, 08:21 PM)haquocquan Đã viết: Đơn giản bạn dùng APPEND là xong. Vì bạn có ID là primary, nó sẽ không append những record đã trùng ID.

Tôi đã thử cách này nhưng access project không cho append (kể cả như record không trùng)?! Nếu là access thuần túy thì OK ngay.
Dủ sao cũng cảm ơn bác nhiều!
Chữ ký của dannynguyen1980 Xin chào, mình là dannynguyen1980, Tham gia http://thuthuataccess.com/forum từ ngày 14-09 -11.
Reply
Những người đã cảm ơn
#5
(03-01-12, 03:14 PM)dannynguyen1980 Đã viết:
(02-01-12, 08:21 PM)haquocquan Đã viết: Đơn giản bạn dùng APPEND là xong. Vì bạn có ID là primary, nó sẽ không append những record đã trùng ID.

Tôi đã thử cách này nhưng access project không cho append (kể cả như record không trùng)?! Nếu là access thuần túy thì OK ngay.
Dủ sao cũng cảm ơn bác nhiều!

Nhưng bạn vẫn có thể run query Insert thông qua run command mà!
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn dannynguyen1980
#6
(03-01-12, 03:14 PM)dannynguyen1980 Đã viết:
(02-01-12, 08:21 PM)haquocquan Đã viết: Đơn giản bạn dùng APPEND là xong. Vì bạn có ID là primary, nó sẽ không append những record đã trùng ID.

Tôi đã thử cách này nhưng access project không cho append (kể cả như record không trùng)?! Nếu là access thuần túy thì OK ngay.
Dủ sao cũng cảm ơn bác nhiều!

Vẫn được bạn ah.....

Bạn tạo 1 Query Append, đặt cho nó 1 cái tên, rồi dùng Docmd.openquery mà thực hiện nó, ok lắm...

Private Sub Command0_Click()
DoCmd.SetWarnings False
DoCmd.OpenQuery "Q1", acViewNormal, acEdit
DoCmd.SetWarnings True
MsgBox "Xong"
End Sub

ღღღღღTài sản của bomnhauag (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Noname , dannynguyen1980


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
Question [Help] Link tất các table trong một file.mdb bằng VBA MinhnHang 7 176 Hôm qua, 11:59 AM
Bài mới nhất: maidinhdan
  [Thủ Thuật] Tìm số thứ tự bị thiếu trong dãy toanle 8 203 07-12-16, 02:25 PM
Bài mới nhất: toanle
Photo [Thủ Thuật] Code chia sẽ hàng thừa Phung Duc 2 58 05-12-16, 04:34 PM
Bài mới nhất: Phung Duc
  Sựa khác nhau giữa Module và Class Module, phạm vi áp dụng của từng loại. MinhnHang 6 303 29-11-16, 09:11 PM
Bài mới nhất: ongke0711
  Tránh xung đột dữ liệu trong access quocdung9999 16 1,692 23-11-16, 11:13 AM
Bài mới nhất: quocdung9999

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ơ