求助：删除全部已有的查询的代码

gdfsslec · 发表于 2008-4-24 09:31:19

只找到删除全部表的，请各位指教！

andymark · 发表于 2008-4-24 09:48:23

删除清空所有查询??

gdfsslec · 发表于 2008-4-24 12:51:00

andymark · 发表于 2008-4-24 13:31:19

Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
For Each obj In dbs.AllQueries
DoCmd.DeleteObject acQuery, obj.Name
Next obj

gdfsslec · 发表于 2008-4-24 21:39:29

谢谢版主[:12]

帐号		自动登录	找回密码
密码			注册

[查询] 求助：删除全部已有的查询的代码

群介绍
主题无相 (随机显示版	同地区群块其他地区)