现有两个数据库 我想把启用一个数据库中的一个表考到另外一个数据库中,请问用ado控件如何实现

解决方案 »

  1.   

    支持ADO的BatchMove控件
      

  2.   

    直接在ADOQuery1中写语句,将该表写到另外一台服务器就可以了
      

  3.   

    用两个ADOQuery分别连到目标和源头数据库,再一条条的导数据就可以
    用ADO考贝表的记录如下:procedure CopyTableData(Dest, Source: TADOQuery; ATable: String);
    var
      i: Integer;
      fldDest: TField;
    begin
      Dest.DisableControls;
      Source.DisableControls;
      try
        Source.Close;
        Source.SQL.Text := 'select * from ' + ATable;
        Source.Open;    Dest.Close;
        Dest.SQL.Text := 'delete * from ' + ATable;
        Dest.ExecSQL;
        Dest.SQL.Text :=  'select * from ' + ATable;
        Dest.Open;    while not Source.Eof do
        begin
          Dest.Append;
          for i := 0 to Source.Fields.Count - 1 do
          begin
            fldDest := Dest.FindField(Source.Fields[i].FieldName);
            if fldDest <> nil then
              fldDest.Value := Source.Fields[i].Value;
          end;
          Dest.Post;
          Source.Next;
        end;
      finally
        Dest.EnableControls;
        Source.EnableControls;
      end;
    end;
      

  4.   

    如果是SQL 2000
    可以直接导入所有任务
    导入数据
    源数据库
    目标数据库
    选择要导入的表就这么几步
      

  5.   

    如果同一台服务器的话,直接把数据跨库insert就好了,无需先读到界面。
      

  6.   

    最笨的方法就是用两个ADOConnection连接两个不同的库,处理就行了
      

  7.   

    用delphi里的datapump工具,很好用的!