L
lihouqi
Unregistered / Unconfirmed
GUEST, unregistred user!
各位高手：
在下用两个QUERY进行主从查询
并将子查询结果放入一个临时表中，
但是总是报错为：“invalid pamramer"
我的部分源代码如下：q2.datasource为q1.datasource//保证主从查询
q1.ParamByName('dt').Asdate:=strtodate(rq.text);
q1.prepare;
q1.open;
q1.first;
while not wsftrz.q1.Eof do//根据q1的每个查询结果，
//用q2 对表rztp.db插入相应的查询结果
begin
wsftrz.q2.ParamByName('dd').Asdate:=strtodate(rq.text);
wsftrz.q2.prepare;
wsftrz.q2.execsql;
wsftrz.q1.next;
// wsftrz.q2.close//不知此句是否需要
end ;
wsftrz.q2.ParamByName('dd').Asdate:=strtodate(rq.text);
wsftrz.q2.prepare;
wsftrz.q2.execsql
end;
其中q1.sql为SELECT 单位 FROM "ddzb.DB" WHERE (日期 =:dt) q2.sql为insert into "rztp.DB" SELECT 矿别, 工作面名 FROM "wsftrz.DB" where (日期=:dd) and (矿别=:单位)
谢谢各位相助，我倾家荡产了，分不多请包涵！以后补上。
在下用两个QUERY进行主从查询
并将子查询结果放入一个临时表中，
但是总是报错为：“invalid pamramer"
我的部分源代码如下：q2.datasource为q1.datasource//保证主从查询
q1.ParamByName('dt').Asdate:=strtodate(rq.text);
q1.prepare;
q1.open;
q1.first;
while not wsftrz.q1.Eof do//根据q1的每个查询结果，
//用q2 对表rztp.db插入相应的查询结果
begin
wsftrz.q2.ParamByName('dd').Asdate:=strtodate(rq.text);
wsftrz.q2.prepare;
wsftrz.q2.execsql;
wsftrz.q1.next;
// wsftrz.q2.close//不知此句是否需要
end ;
wsftrz.q2.ParamByName('dd').Asdate:=strtodate(rq.text);
wsftrz.q2.prepare;
wsftrz.q2.execsql
end;
其中q1.sql为SELECT 单位 FROM "ddzb.DB" WHERE (日期 =:dt) q2.sql为insert into "rztp.DB" SELECT 矿别, 工作面名 FROM "wsftrz.DB" where (日期=:dd) and (矿别=:单位)
谢谢各位相助，我倾家荡产了，分不多请包涵！以后补上。