GeoDatabaseエクステントは常に拡大します-自動的に縮小することはありません。圧縮と圧縮は、ストレージと断片化のみを最適化し、エクステント自体は最適化しません。私がしようとするだろう最初の空間インデックスを再作成し、それはトリックを行うかどうかを確認します。
更新:
空間インデックスの再構築はトリックを行わないため、次のVBAコードは確実に動作します。
Public Sub reCalcExt()
Dim pGXApplication As IGxApplication
Set pGXApplication = Application
Dim pGxObject As IGxObject
Set pGxObject = pGXApplication.SelectedObject
If Not TypeOf pGxObject.InternalObjectName Is IFeatureClassName Then
Exit Sub
End If
Dim pName As IName
Set pName = pGxObject.InternalObjectName
Dim pSchemaLock As ISchemaLock
Set pSchemaLock = pName.Open
pSchemaLock.ChangeSchemaLock esriExclusiveSchemaLock
Dim pFeatureClassManage As IFeatureClassManage
Set pFeatureClassManage = pSchemaLock
pFeatureClassManage.UpdateExtent
Exit Sub
ErrHandler:
pSchemaLock.ChangeSchemaLock esriSharedSchemaLock
End Sub
これは、ESRIでサポートされている他のプログラミング言語で実行できます。秘Theは、スキーマロックを取得し、IFeatureClassManage :: UpdateExtentメソッドを使用することです。