Cách đưa chức năng compact & repair vào form
toancvp > 02-08-16, 11:16 AM
Em đang tìm cách để đưa Compact & repair vào Command Button trong form vì dự án cũng gần đến hồi kết
. Thực tế em có tìm được hướng dẫn như thế này ạ,
-----------------
nén file Access bằng VBA
Bình thường,khi mà các câu lệnh Make, Append, delete thực hiện nhiều lần thì file access của bạn sẽ phình to không tưởng tượng được, có khi lên tới hàng GB, để nén access ta vào menu tool-->database Ulities-->Compact and repair Database
Nhưng đôi khi chúng ta cần thực hiện điều đó bằng VBA vì đã khóa Menu, thay bằng customise menu, hoặc với mục đích thân thiện với người dùng chỉ trên một nút nhấn.
hãy copy đoạn code sau của tác giả Juan M. Afan de Ribera để làm điều đó
Code:
' ***** Code Start *****
Public Sub CompactDB()
CommandBars("Menu Bar"). _
Controls("Tools"). _
Controls("Database utilities"). _
Controls("Compact and repair database..."). _
accDoDefaultAction
End Sub
' ***** Code End *****
Thảo luận thêm: http://thuthuataccess.com/forum
----------------------------
( bài viết của bác Duy Tuấn )
Tuy nhiên em không biết phải làm sao để tạo Public Sub CompactDB() cả, em thử nhét vào module rồi nhưng không được, các bác hướng dẫn cụ thể hơn giúp em với ạ. Thực sự về vụ này em không hiểu lắm, em đã tìm hiểu về public sub và sub rồi nhưng hình như do đọc vội quá chẳng ra vấn đề các bác ạ.