l3396949 发表于 2012-12-13 16:06
dim qdf as querydef
set qdf=currentdb.querydefs("查询1")
qdf.sql= "select * from 查询1 whe ...
鬼打架。
set qdf=currentdb.querydefs("查询1")
qdf.sql= "select * from 查询1 where 查询1.部门 = 1"当然是循环引用。from子句要直接用数据表,除非创建一个查询2.
假设查询1为:select * from 表1 where year(日期)=year(date())
则重新修改查询需要这样写:
set qdf=currentdb.querydefs("查询1")
qdf.sql= "select * from 表1 where year(日期)=year(date()) and 部门=1"