主题：[求助]删除表

If DataTables.Contains("表1")
MainTable = Tables("表1")
Syscmd.Table.Delete()
End If
Syscmd.Project.QuickImport()

我想在导入表之前先删除原来的表，就写了上述代码。没发布的时候测试还是正常的，发布后就不能删掉“表1”了，怎么解决呀？

没有好办法了吗？

DataTables.Unload("表B")
Dim Builder As New ADOXBuilder
Builder.Open()
With Builder
    .DeleteTable("表B")
End With
Builder.Close()

我是想删了表之后，再从外面excel里导进来

If DataTables.Contains("表B") Then
    DataTables.Unload("表B")
    Dim Builder As New ADOXBuilder
    Builder.Open()
    With Builder
        .DeleteTable("表B")
    End With
    Builder.Close()
End If
Syscmd.Project.QuickImport()

谢了