ACE Giúp mình tự động lấy dữ liệu từ Tables trong SQL ra Excel với.

[hoanghoa_dtt91]

...
With objCommand
.ActiveConnection = objConnection
.CommandText = strSQL
End With
objCommand.Execute
' Xoá bớt dữ liệu - xoá những dòng lớn hơn 1 tháng tuổi
objConnection.Execute "DELETE FROM dbo.test WHERE 1 <= DateDiff(month,[Date],GetDate())"
' Xoá xong
Set objCommand = Nothing
objConnection.Close
Set objConnection = Nothing
...

Chú ý: đặt tên trường mà dùng những tên Date, Month, Year,... là rước hoạ vào thân

Cảm ơn bác nhiều! đang định hỏi thêm xoá theo giờ, phút, ngay... nữa nhưng thôi để làm xem đã. nếu không làm đc xẽ hỏi bác sau.

 

[nhare24h]

bạn phải ghi rõ My SQL hay SQL vì nó có sự khác biệt nhau nhé

 

[VetMini]

bạn phải ghi rõ My SQL hay SQL vì nó có sự khác biệt nhau nhé

Trước khi tài khôn thì chịu khó đọc một chút. Tôi có đặt vấn đề này rồi. Và chủ thớt người ta đã xác định rồi:

Tìm trên diễn đàn toàn thấy hướng dẫn "Kết nối truy vấn CSDL từ file Excel đến file Access."

Không thấy hướng dẫn truy vấn CSDL đến SQL Server. Ai giúp mình truy vấn tới SQL server với. Thank!