Hai !
How can i compact an repair a password protected Access data base file using vb 6.0. i use access 2000 version
Thanks in advance

Hi there.. I don't remember the exact code, but ADOengine has a compact (that also repair) function...

HTH

Gonzalo

================================================== =========
Read this if you want to know how to get a correct reply for your question:
http://www.catb.org/~esr/faqs/smart-questions.html
^^Took that from dparsons signature and he Took that from planoie's profile
================================================== =========
My programs achieved a new certification (can you say the same?):
WORKS ON MY MACHINE
http://www.codinghorror.com/blog/archives/000818.html
================================================== =========
I know that CVS was evil, and now i got the proof:
http://worsethanfailure.com/Articles...-Hate-You.aspx
================================================== =========

The following link might help you

http://vbadud.blogspot.com/2007/09/r...ft-access.html

Cheers
Shasur

http://www.dotnetdud.blogspot.com

VBA Tips & Tricks (http://www.vbadud.blogspot.com)

Hello,

Does anyone know how to compact a db in Access 2007 using VBA code? I will be happy to compact it on closing the application, since the database would have to be closed during the compact process.

Thank you all in advance!

You can try this one

Sub Main()

Dim jro As JRO.JetEngine

jro = New JRO.JetEngine()

jro.CompactDatabase("Provider=Microsoft.Jet.OLEDB. 4.0;Data Source=C:\nwind.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\NewNwind.mdb;Jet OLEDB:Engine Type=5")

MsgBox("Finished Compacting Database!")
End Sub

__________________
(*_*)

Numan
--------------------------------------------------
It is not important what you get But important is  how you got it

Hi

Do you want it to be done using Access Vba or from Excel or Word

Cheers
Shasur

__________________
C# Code Snippets (http://www.dotnetdud.blogspot.com)

VBA Tips & Tricks (http://www.vbadud.blogspot.com)

Shaur,

I am trying to do it from Access 2007 via VBA.

Thank you,
Bella

Hi Numan,

Thank you for your reply, nope, the code does not want to work..:(

Bella

In case of VBA

http://stackoverflow.com/questions/1...atabase-in-vba

might be helpful for you.

Best of luck :)

__________________
(*_*)

Numan
--------------------------------------------------
It is not important what you get But important is  how you got it