Foxtable(狐表)用户栏目专家坐堂 → 请教删除表


  共有2773人关注过本帖树形打印复制链接

主题:请教删除表

帅哥哟,离线,有人找我吗?
hbhb
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
请教删除表  发帖心情 Post By:2015/6/7 15:25:00 [只看该作者]

大师:好!

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


用下面的代码就要重启

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

End With

Builder
.Close()


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


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/7 15:27:00 [只看该作者]

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

 


 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By: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就运行?


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/7 15:52:00 [只看该作者]

 表B大写,Contains函数不支持大小写忽略

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/6/7 16:01:00 [只看该作者]

难怪,谢谢!还有哪些在编写代码是要注意的?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/7 16:02:00 [只看该作者]

实践出真知

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/6/7 16:10:00 [只看该作者]

确实如此,时间就是金钱呀!老兄就不能指点一二,有无笔记,或者经验论之类的,内部保密对象销售?

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/6/7 16:12:00 [只看该作者]

或推荐几本好的书籍,我想拜读拜读!

 回到顶部