我正在用 vb.net 编写 ArcMap-AddIn。尝试使用compact
IWorkspace(mdb) 时出现错误,错误是:
异常
您试图打开一个数据库,该数据库已由计算机“XXXXXX”上的用户“ADMIN”打开。当数据库可用时再试一次。
在 ESRI.ArcGIS.Geodatabase.IDatabaseCompact.Compact() 上 MyProject.MyClass.CompactGDB(IWorkspace pWS)
如何压缩使用过的工作空间?还有 8 个其他功能也使用了我的工作区。
有什么建议么?
编码:
' CompactGDB
Public Sub CompactGDB(ByVal pWS As IWorkspace)
Dim pDatabaseCompact As IDatabaseCompact
If (TypeOf pWS Is IDatabaseCompact) Then
pDatabaseCompact = CType(pWS, IDatabaseCompact)
If (pDatabaseCompact.CanCompact) Then
Try
pDatabaseCompact.Compact()
Catch ex As Exception
MessageBox.Show(ex.type & ex.Message & ex.StackTrace, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End If
End If
End Sub