Josh, did you ever get IDatabaseCompact to work? I seem to be running into a basic flaw (either with the object or my understanding of it - more likely). The Example for IDatabaseCompact shows the following: Set pWorkspaceFactory = New AccessWorkspaceFactory Set pWorkspace = pWorkspaceFactory.OpenFromFile("C:\arcgis\ArcTutor\BuildingaGeodatabase\Montgomery.mdb", 0) Dim pDatabaseCompact As IDatabaseCompact If TypeOf pWorkspace Is IDatabaseCompact Then Set pDatabaseCompact = pWorkspace If pDatabaseCompact.CanCompact Then pDatabaseCompact.Compact End If End If But it dies on Compact as the database is open and has a lock on it. I'm told to try again when the DB is available. How do you get around this? Any help would be greatly appreciated. Dan
... View more