如何在MS Access中以编程方式更改querydef sql

Question

我已经做好了

Dim qd as querydef
set qd = Querydefs("MyQuery")
qd.sql = "..."

在调试qd.sql已更新但物理MyQuery仍包含旧的SQL.

如何更新此物理查询？

微软给出的源代码 http://msdn.microsoft.com/en-us/library/bb177500.aspx

也不起作用.

Answer 1

除了对象之外,不应使用SET.你需要QueryDefs的一个对象,所以:

Dim qd As QueryDef
Set qd = CurrentDb.QueryDefs("MyQuery")
qd.SQL = "SELECT Category FROM Categories"

确保SQL有效,否则会出错.