以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]删除表  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=71210)
--  作者：wldhj
--  发布时间：2015/7/7 12:45:00
--  [求助]删除表

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

我想在导入表之前先删除原来的表，就写了上述代码。没发布的时候测试还是正常的，发布后就不能删掉“表1”了，怎么解决呀？
--  作者：wldhj
--  发布时间：2015/7/7 14:43:00
--  
没有好办法了吗？
--  作者：大红袍
--  发布时间：2015/7/7 15:07:00
--  
DataTables.Unload("表B")
Dim Builder As New ADOXBuilder
Builder.Open()
With Builder
    .DeleteTable("表B")
End With
Builder.Close()
--  作者：wldhj
--  发布时间：2015/7/7 15:19:00
--  
我是想删了表之后，再从外面excel里导进来
--  作者：大红袍
--  发布时间：2015/7/7 15:20:00
--  
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()
--  作者：wldhj
--  发布时间：2015/7/7 15:22:00
--  

谢了