Access. Xin Giúp Đỡ

[TuanBoyBong]

Mình có 3 file
VD: file1.mdb
file2.mdb
file3.mdb
các file này có cùng cấu trúc, chia cho 3 người nhập số liệu
bây giờ mình muốn gom 3 file này thành 1 file duy nhất ví dụ FILE1.mdb.
File1.mdb chứa tất cả các dữ liêu đã nhập của file2 và file3. Làm bằng Access . Các anh chỉ dumg mình cám ơn các anh nhiều lắm
Mình đang gấp, fải gởi file nay đi cho đúng hẹn

[thangdung]

hi,
thi ban mo table ra roi copy xong roi past vao database kia la duoc,
theo minh thi ban nen de 1 dabase va share thu muc nay cho 3 nguoi dung la duoc

[lucky_satr]

hi
ban co the vao file ->get external data ->import
sau do se hien ra hop thoai va ban muon chuyen table,query ma ban chon

[tieutam]

Bạn mở từng table của flile 2 và file 3 chọn copy rồi vào từng table của file 1 và chọn PATSE APPEND

[hithere]

su dung nhieu connection - roi ngoi hi huc lap trinh doc du lieu tu file nay insert vao file kia

[paulsteigel]

Sub ImportDb()
' Cần phải đặc tả tên của db ví dụ:
' tên file đầu tiên là db1.mdb, các file khác phải được đặt cùng thư mục và có tên là db2.mdb và db3.mdb để dễ theo dõi
' đưa đoạn mã sau vào một module và viết
Dim tb As Object
Dim db As Database
Dim dbPath As String
' Thiết lập đường dẫn
dbPath = CurrentProject.Path & "\"
'1. tìm kiếm tất cả các bảng trong db1 và loại trừ bảng hệ thống
For Each tb In CurrentDb.TableDefs
If not ucase(tb.Name) like "MS*" Then
' Không duyệt bảng hệ thống
' và thực thi querry thôi
CurrentDb.Execute ("INSERT INTO [" & tb.Name & "]" & _
"SELECT * FROM [" & tb.Name & "]" & " in '" & dbPath & "db2.mdb';")
CurrentDb.Execute ("INSERT INTO [" & tb.Name & "]" & _
"SELECT * FROM [" & tb.Name & "]" & " in '" & dbPath & "db3.mdb';")
End If
Next
'Xong nhé
End Sub