Compact and repair Database bị lỗi

[bchip]

- Mình dung đoạn code sau để giảm bớt dung lượng file .mdb:

Public Sub CompactDB()
CommandBars("Menu Bar"). Controls("Tools"). _
Controls("Database utilities"). Controls("Compact and repair database..."). _
accDoDefaultAction
End Sub

- Khi chạy chương trình báo lỗi:
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
" Run-time error '-2147467259 (80004005)': "
" Method 'accDoDefaultAction' of object '_CommonBarButton' failed "
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Nhờ các bác giúp mình vạch đường để bước tiếp. Thanks !

 

[phatnq2002]

Ðề: Compact and repair Database bị lỗi

- Mình dung đoạn code sau để giảm bớt dung lượng file .mdb:

Public Sub CompactDB()
CommandBars("Menu Bar"). Controls("Tools"). _
Controls("Database utilities"). Controls("Compact and repair database..."). _
accDoDefaultAction
End Sub

- Khi chạy chương trình báo lỗi:
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
" Run-time error '-2147467259 (80004005)': "
" Method 'accDoDefaultAction' of object '_CommonBarButton' failed "
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Nhờ các bác giúp mình vạch đường để bước tiếp. Thanks !

Lỗi này liên quan đến loại CSDL đang sử dụng, tôi không rõ bạn thiết kế như thế nào, dùng MDB hay ADP.

Mà đôi khi có thể có một lỗi khác trước khi chạy Method này, mà Access khi chạy đến nó mới trig cái lỗi, nên nó show cái method này ra.

Bạn cần nói rõ hơn cái thiết kế của bạn ra sao thì chúng tôi mới có thể hỗ trợ cho bạn.