Đá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
  Sử dụng Class Module và Kết nối dữ liệu SQL SERVER trong Access VBA lehongduc 43 17,343 18-12-16, 03:37 PM
Bài mới nhất: huuduy.duy
  Hướng Dẫn Enter xuống dòng trong textbox thanhquyt 2 95 18-12-16, 09:43 AM
Bài mới nhất: thanhquyt
  Lấy record từ tbl1 làm thành field trong tbl2. MinhnHang 5 156 13-12-16, 03:05 PM
Bài mới nhất: ongke0711
Photo [Thủ Thuật] Code chia sẽ hàng thừa Phung Duc 5 142 12-12-16, 04:25 PM
Bài mới nhất: ongke0711
Question [Help] Link tất các table trong một file.mdb bằng VBA MinhnHang 9 295 09-12-16, 06:11 PM
Bài mới nhất: maidinhdan

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ơ