Dùng VBA đưa dữ liệu vào SQL Server

One Response

1. hands says:

   30/01/2023 at 4:07 pm

   Hi Quân
   Với file định Bulk Insert vào SQL Database như đính kèm, bạn soạn cho mình 1 Proc để từ SSMS có thể tự động import dữ liệu vào database với. Cảm ơn bạn
   Diễn đàn ko cho phép update với đuôi .csv nên mình phải nén lại thành file .rar

   2624

   Bạn tạo bảng tạm có các cột như bảng gốc, có mỗi cột đầu, thay vì datetime thì bạn khai báo là varchar, sau đó bulk insert vào bảng tạm, cuối cùng là insert data từ bảng tạm sang bảng gốc (dunng convert để đưa về đúng kiểu dữ liệu bảng gốc)

   Tôi có chỉnh sửa lại cái stored procedure (SP) mà tôi dùng cho "Bulk Insert" nhưng cái Sp này là tôi dùng table tạm của hệ thống SQL Server (#TempTable) chứ không phải Table tạm bạn tạo sẳn trong Database của bạn.
   Lưu ý là: muốn BULK INSERT thì User đó phải có quyền Admin của Database nên cẩn trọng trong việc phân quyền thực hiện tính năng này.
   Một lưu ý khác là BULK INSERT không dùng được tham số (parameter) nên bạn không thể khai báo tên biến đường dẫn file để đưa vào SP được mà phải dùng SQL động.
   Ví dụ: cách này sẽ báo lỗi chỗ tham số @filePath
   ——————————————
   USE
   GO
   CREATE PROCEDURE . (@filePath VARCHAR(MAX))
   AS
   BEGIN
   CREATE TABLE #TempCSV
   (
   NGAY_XUAT_HOA_DON Varchar(20),
   CACH_THANH_TOAN Varchar(10) NULL,
   SO_HOA_DON Varchar(15),
   …
   )
   BULK INSERT #TempCSV
   From @filePath
   With (
   FIELDTERMINATOR = ',',
   ROWTERMINATOR = 'n'
   FIRSTROW = 2
   )
   …
   END
   ——————————————————

   Cách đúng: Tạo SP dùng SQL động

   USE [testDB]
   GO
   
   CREATE PROCEDURE [dbo].[ImportCSVFile] (@filePath VARCHAR(MAX))
   AS
   BEGIN
       CREATE TABLE #TempCSV
       (
           NGAY_XUAT_HOA_DON Varchar(20),
           CACH_THANH_TOAN Varchar(10) NULL,
           SO_HOA_DON Varchar(15),
           MAWB_NO Varchar(15),
           HAWB Varchar(15),
           MO_TA_DICH_VU Varchar(50),
           PHI_DICH_VU Money,
           VAT Float,
           THANH_TIEN Money,
           GIA_TRI_TREN_HOA_DON money,
           DON_VI_XUAT Varchar(15),
           NHAN_VIEN_XUAT_HOA_DON Varchar(30)
       )
   
   DECLARE @SQL NVARCHAR(MAX) = ''
       SET @SQL = N'
       BULK INSERT #TempCSV
         FROM ''' + @filePath + '''
         WITH (
           FIELDTERMINATOR = '','',
           ROWTERMINATOR = ''n'',
           FIRSTROW=2
         )'
   
   EXEC sp_executesql @SQL
   
   SELECT * FROM #TempCSV
   END

   Sau khi tạo stored proc. "ImportCSVFile" xong, bạn chạy câu lệnh này để kiểm tra.
   (Tự sửa đường dẫn tới file CSV trên máy bạn)

   USE [TestDB]
   GO
   
   EXEC dbo.ImportCSVFile 'C:TempExportCashInvoice.csv'

   – Cái SP này sẽ Bulk Insert vào table tạm (có dấu thăng "#") của hệ thống (nằm trong: Databases -> System Databases -> tempdb -> Temporary Tables).
   – Table tạm này sẽ tự động bị xoá khi phiên kết nối hiện tại (phiên chạy Sp) đóng. Phiên kết nối khác sẽ không nhìn thấy table tạm này.
   – Nếu file CSV bạn muốn Insert chỉ có một số Field của một table tổng thôi thì bạn có thể dùng View để chỉ Bulk Insert.
   Ví dụ:
   ——————————————–
   Create View HoaDonView
   As
   Select Ngay_Xuat_Hoa_Don,
   Cach_Thanh_Toan,
   ….
   From tblHoaDonTong
   ——————————————–

   ==>
   ——————————————–
   Bulk Insert HoaDonView
   From …
   With …

   ——————————————–

   Reply