以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教删除表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69570)

--  作者:hbhb
--  发布时间:2015/6/7 15:25:00
--  请教删除表

大师:好!

代码删除表,用系统命令,不重启就生效。


用下面的代码就要重启

Dim Builder As New ADOXBuilder
Builder
.Open()
With
Builder
    .
DeleteTable("表A")
   

End With

Builder
.Close()


那代码中是否可以直接用系统命令删除指定名称的表,且不出现对话框?


--  作者:大红袍
--  发布时间:2015/6/7 15:27:00
--  

 谁说要重启?你把表unload,然后删,也是同样的效果啊

 


--  作者:hbhb
--  发布时间:2015/6/7 15:47:00
--  
If DataTables.Contains("表b")  Then \'如果表b已经加载
    DataTables.Unload("表b") \'卸载表b
End If


Dim Builder As New ADOXBuilder
Builder.Open()
With Builder
    .DeleteTable("表b")
    
End With
Builder.Close()




请问为何以上代码不运行,而换成表c就运行?


--  作者:大红袍
--  发布时间:2015/6/7 15:52:00
--  
 表B大写,Contains函数不支持大小写忽略
--  作者:hbhb
--  发布时间:2015/6/7 16:01:00
--  
难怪,谢谢!还有哪些在编写代码是要注意的?
--  作者:大红袍
--  发布时间:2015/6/7 16:02:00
--  
实践出真知
--  作者:hbhb
--  发布时间:2015/6/7 16:10:00
--  
确实如此,时间就是金钱呀!老兄就不能指点一二,有无笔记,或者经验论之类的,内部保密对象销售?
--  作者:hbhb
--  发布时间:2015/6/7 16:12:00
--  
或推荐几本好的书籍,我想拜读拜读!