【搞定】数据导出问题!

gundamcharred

又是ZFANG出来救我啊!谢谢
网上是找过的,基本没有类似的内容,至于ZFANG的方法我觉得很可行,有没有具体一点的例子呢?

gundamcharred

alang的方法我也想过,不过导入的时候就不太好办了吧.

gundamcharred

可以分别打开表记录，然后循环写数据记录到一个文件的方式。

这个试了一下,第二次SAVETOFILE就把上一次的覆盖了,对文件应该是不能连续的写记录,

gundamcharred

是不是可以把连续取得的数据集连续的存储到另一个数据集中呢?然后再使用另一个数据集的SAVETOFILE来写到文件中?

alang

导入为什么不好办呢？

gundamcharred

你的意思是实际上导出的还是不同的文件,导入的时候怎么办呢?loadtofile之后依次导入么?这里具体怎么运作的我不太明白.压缩和解压缩的算法能做到什么地步?

zfang

楼主没理解我的意思。
楼主可以参考delphi中的用法：
var   
    YouFile:TextFile;   
begin   
    AssignFile(YouFile,'FileName');   
    ReSet(YouFile);   
     try   
       //操作
   //记录集一，一行行写入
   //记录集二，一行行写入
   //...
  finally   
        ColseFile(YouFile);   
    end;   
end;

gundamcharred

请问平台能不能用bcp?

zfang

楼主，平台中可以这么去用
var
  YouFile : TStrings;
begin
  YouFile := TStringList.Create;
  try
    //记录集1
    InfoBroker.Info.DataSets[0].Open;
    InfoBroker.Info.DataSets[0].First;
    while not InfoBroker.Info.DataSets[0].Eof do
    begin
      YouFile.Add(记录信息);
      InfoBroker.Info.DataSets[0].Next;
    end;
    //记录集2
    //记录集3
    //....

    YouFile.SaveToFile('c:\a.txt');
  finally
    YouFile.Free;
  end;

不知道这样，是否可以满足楼主的要求。

gundamcharred

那表结构呢????我现在是用的网上搜索来的方法:用ADOCONNECTION.CONNECTIONSTRING去找一个数据源,然后再忘这里面连续的写入表,也就是数据库中的,不经过DataSet,Query什么的,只有一个ADOCONNECTION,很简单
不过有一个问题,就是每次都要选中一个已经有了的数据源:或DBF或MDB,能不能直接创建一个新的数据库呢???