Trouble w\ Access Reference

[fish_8888]

I am writing a VB program that reads and writes to a Access database.

I am trying to use an Accsess reference to compact and repair the database.

Access.Application.CompactRepair ("D:\WOR DATA\WOR_new.mdb")

When I run the program I get an error of Argument not optional.
Can some one please help me?

Thanks in advance,
Fish_8888

[vbUserName]

You can try this:

Dim DBE As DBEngine

    Set DBE = New DBEngine

    DBE.CompactDatabase "C:\MyDB.mdb", "C:\MyDBCompacted.mdb"

    Set DBE = Nothing