盒子论坛 v2.1

本人的代码如下：
with adoquery2 do
        begin
        while not adoquery1.Eof do
        begin
        adoquery2.Close;
        adoquery2.sql.Clear;
       adoquery2.sql.Add('select * from ty3 where id between qishi and zhongzhi');
          adoquery2.parameters.ParamByName('qishi').Value:=qishi;
               adoquery2.parameters.ParamByName('zhongzhi').Value:=zhongzhi;
               adoquery2.open;
               if adoquery2.RecordCount<>0 then
               begin
               adoquery2.edit;
               adoquery2.fields[1].Value:=(adoquery2.fields[1].Value)+(adoquery1.Fields[1].Value);
               adoquery2.post;

               end
               else
               begin
               adoquery2.append;
               adoquery2.Fields[0].Value:=adoquery1.Fields[0].Value;
               adoquery2.Fields[1].Value:=adoquery1.Fields[1].Value;
               adoquery2.post;

               end;
               adoquery1.Next;
               end;
             end;
             end;
想实现如下功能：从adoquery1所连的数据库1中选一些数据然后存到adoquery2 所连的数据库2中，以上代码虽说能实现这个功能，但是却不能对adoquer2所连的数据库2进行select操作，而且在程序的运行结束以后，在数据库中的数据依然为空，不知道这为什么，求各位大侠能为我指点指点!!!
----------------------------------------------
-

作者：

playerjn (草脚一个)	★☆☆☆☆	-
	盒子活跃会员

2004/8/4 13:53:30

1楼：

用UPDATEBASE试试
----------------------------------------------
草得你心服口服
草得你五体投地

作者：

waiwaixing (waiwaixing)	★☆☆☆☆	-
	普通会员

2004/8/4 14:00:23

2楼：

怎么用？？
----------------------------------------------
-

作者：

playerjn (草脚一个)	★☆☆☆☆	-
	盒子活跃会员

2004/8/4 14:05:31

3楼：

不要用POST,用UPDATEBASE.(可能有拼错,你在程序里用CTRL+SPASE点出来看吧)
----------------------------------------------
草得你心服口服
草得你五体投地

作者：

waiwaixing (waiwaixing)	★☆☆☆☆	-
	普通会员

2004/8/4 14:07:26

3楼：

这个命令不能用啊！！
----------------------------------------------
-

作者：

waiwaixing (waiwaixing)	★☆☆☆☆	-
	普通会员

2004/8/4 14:14:30

4楼：

不行，我把所有带update的命令都试过了。还有没有其他的方法？？
----------------------------------------------
-

作者：

playerjn (草脚一个)	★☆☆☆☆	-
	盒子活跃会员

2004/8/4 14:25:21

4楼：

  with adoquery2 do
  begin
    FIRST;
    while not adoquery1.Eof do
    begin
      Close;
      sql.Clear;
      sql.Add('select * from ty3 where id between qishi and zhongzhi');
      parameters.ParamByName('qishi').Value:=qishi;
      parameters.ParamByName('zhongzhi').Value:=zhongzhi;
      open;
      if RecordCount<>0 then
      begin
        Edit;
        fields[1].Value:=(fields[1].Value)+(adoquery1.Fields[1].Value);
        UpdateBatch;

      end
      else
      begin
        append;
        Fields[0].Value:=adoquery1.Fields[0].Value;
        Fields[1].Value:=adoquery1.Fields[1].Value;
        UpdateBatch;

      end;
      adoquery1.Next;
    end;

  end;
----------------------------------------------
草得你心服口服
草得你五体投地

作者：

hjjszhshs (我心飞翔)	★☆☆☆☆	-
	盒子活跃会员

2004/8/5 7:54:02

5楼：

adoquery2.sql.Add('select * from ty3 where id between qishi and zhongzhi');
改為﹕
adoquery2.sql.Add('select * from ty3 where id between :qishi and :zhongzhi');
試試;

----------------------------------------------
-

信息

登陆以后才能回复