How to call a DAO method from DTS package

[rhofing]

Hello, I would like to call the DAO DBEngine.compactdatabase method to compact an Access database before I populate it with new data.

I need to run this as part of an ActiveX task in a DTS package. Can someone show me a VBscript code sample to accomplish this?

Many thanks!

Ric

 

[tb]

Never done it before . . . but this might help you in the right direction . . .

Dim objObject

1) Set objObject= CreateObject("DBEngine.compactdatabase&quot
Call objObject.excecute(Any prameters needed)
or . . .
2) Set objObject= CreateObject("DBEngine&quot
Call objObject.compactdatabase(Any prameters needed)

Set compactdatabase= Nothing

Hope it helps!


I was standing in the park, wondering why frisbees got bigger as they came closer... then it hit me!