Minh Tiên > 02-11-16, 12:20 PM
Trích dẫn:INSERT INTO tblTest ( Mahang, Tenhang, Donvitinh, Nhomhang, Dongiabanle ) IN 'E:\Users\Paulsteigel\Desktop\gpE\qbNHNhan\test.mdb'chạy rất nhanh.
SELECT a.Mahang, a.Tenhang, a.Donvitinh, a.Nhomhang, 5 AS DGBL
FROM strTableNameTam AS a;
maidinhdan > 02-11-16, 11:08 PM
(02-11-16, 12:20 PM)Minh Tiên Đã viết: Chào Ngọc (paausteilgel) !
Tiên dùng đoạn code sau của Ngọc
Trích dẫn:INSERT INTO tblTest ( Mahang, Tenhang, Donvitinh, Nhomhang, Dongiabanle ) IN 'E:\Users\Paulsteigel\Desktop\gpE\qbNHNhan\test.mdb'chạy rất nhanh.
SELECT a.Mahang, a.Tenhang, a.Donvitinh, a.Nhomhang, 5 AS DGBL
FROM strTableNameTam AS a;
Cho Tiên hỏi nếu file test.mdb có Pass thì chuỗi kết nối như thế nào ?
Thanks nhiều !
Trích dẫn:Mã PHP:' Khoi tao ket noi voi CSDL
Property Get ConnectDatabase(dpPath As String, Optional ConnectAsADODB As Boolean = True) As Object
Dim dbs As Object
On Error GoTo ErrHandler
If ConnectAsADODB Then
Set dbs = CreateObject("ADODB.Connection")
dbs.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dpPath & ";"
dbs.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & linkData & "\Test1.mdb;Jet OLEDB:Database Password=maidinhdan;"
Minh Tiên > 04-11-16, 03:24 PM
Dim sql as string
sql = "INSERT INTO [;DATABASE=E:\Thunghiem\Apend\FileNguon_WithPass.accdb;PWD=a1].TableName_Dich SELECT * FROM table_Nguon;"
CurrentDb.Execute sql
maidinhdan > 04-11-16, 05:07 PM
(04-11-16, 03:24 PM)Minh Tiên Đã viết: Sau một thời gian tìm tòi, Tiên đã làm được. Đoạn code đơn giản ko phức tạp như Dân nói.
Cụ thể:
Trong đó:Mã:Dim sql as string
sql = "INSERT INTO [;DATABASE=E:\Thunghiem\Apend\FileNguon_WithPass.accdb;PWD=a1].TableName_Dich SELECT * FROM table_Nguon;"
CurrentDb.Execute sql
- E:\Thunghiem\Apend\FileNguon_WithPass.accdb là Tên đường dẫn và File
- a1 là Password
-TableName_Dich là tên table đích được ghi dữ liệu vào;
- table_Nguon là table nguồn lấy dữ liệu.
Insert rất nhanh và OK !
Xin chia sẻ.
Thân./.
Minh Tiên > 04-11-16, 05:49 PM
haonlh > 04-08-20, 05:32 PM
haonlh > 05-08-20, 11:13 AM
ongke0711 > 05-08-20, 12:32 PM
(05-08-20, 11:13 AM)haonlh Đã viết: Nhờ đọc đoạn cuối của (maidinhdan) của
https://thuthuataccess.com/forum/thread-9259.html[url=https://thuthuataccess.com/forum/thread-9259.html][/url]
Bạn nên dùng cái nào?
Bạn có thể sử dụng DAO, ADO hoặc cả hai làm công nghệ giao diện cơ sở dữ liệu của bạn. DAO tiếp tục là công nghệ giao diện cơ sở dữ liệu mặc định trong Access.
Ví dụ: Tất cả các biểu mẫu, báo cáo và truy vấn Access sử dụng DAO. Nhưng khi di chuyển sang SQL Server, hãy cân nhắc đến việc sử dụng ADO để tăng tính hiệu quả cho giải pháp của bạn. Đây là các hướng dẫn chung để giúp bạn quyết định khi nào sử dụng DAO hoặc ADO.
Sử dụng DAO khi bạn muốn:Sử dụng ADO khi bạn muốn:
- Tạo biểu mẫu đọc/viết, liên kết mà không cần sử dụng VBA.
- Các bảng cục bộ truy vấn.
- Tải dữ liệu xuống bảng tạm thời.
- Sử dụng truy vấn chuyển qua làm nguồn dữ liệu cho các báo cáo hoặc biểu mẫu trong chế độ chỉ đọc.
- Xác định và sử dụng đối tượng TableDef hoặc Querydef trong VBA.
- Tận dụng thêm các cách thức tối ưu hóa, chẳng hạn như thực hiện các thao tác không đồng bộ.
- Chạy các truy vấn chuyển qua DDL và DML.
- Truy nhập dữ liệu SQL Server trực tiếp thông qua recordsets trong VBA.
- Viết mã đơn giản hơn cho một số tác vụ nhất định, chẳng hạn như truyền các đối tượng lớn dưới dạng nhị phân.
- Gọi trực tiếp một thủ tục lưu sẵn bằng các tham số, sử dụng đối tượng lệnh trong VBA.
AnNguyen > 05-08-20, 12:45 PM
(05-08-20, 12:32 PM)ongke0711 Đã viết: .....
INSERT INTO tblTest ( Mahang, Tenhang, Donvitinh, Nhomhang, Dongiabanle ) IN 'E:\Users\Paulsteigel\Desktop\gpE\qbNHNhan\test.mdb'
SELECT a.Mahang, a.Tenhang, a.Donvitinh, a.Nhomhang, 5 AS DGBL
FROM strTableNameTam AS a;
nên Tiên mày mò để text thử -->Ch
ongke0711 > 05-08-20, 04:05 PM
(05-08-20, 12:45 PM)AnNguyen Đã viết:Mã:INSERT INTO tblTest ( Mahang, Tenhang, Donvitinh, Nhomhang, Dongiabanle ) IN 'E:\Users\Paulsteigel\Desktop\gpE\qbNHNhan\test.mdb'
SELECT a.Mahang, a.Tenhang, a.Donvitinh, a.Nhomhang, 5 AS DGBL
FROM strTableNameTam AS a;
nên Tiên mày mò để text thử -->Ch
Anh Bảo ơi có phải đoạn code này là để lấy dữ liệu từ sql sv rồi đổ vào 1 table local ở MS Access không ạ?
Em cũng làm thế nhưng toàn báo lỗi ạ.