1.如果确实如此,自己写一个通用过程也不难。 2.不是很明白你的问题。是指这段时间内增加的数据?如果有一个字段就好办: select * from tbl where FDate Between 2001-2-3 And 2002-6-7
2.select * from tbl where FDate Between '2001-2-3' And '2002-6-7'
过程简要实现:procedure SaveDataToFile(oData :TADODataSet; psFile :string); var i:integer; tss :TStringList; ts :string; begin if (oData = nil) or oData.IsEmpty then Exit; ts := TStringList.Create; with oData do begin while not Eof do begin ts := ''; for i :=0 to Fields.Count -1 do ts := ts + Fields[i].AsString +#8; //Tab间隔 Delete(ts, length(ts), 1); tss.Add(ts); Next; end; end; tss.SaveToFile(psFile); tss.Free; end;
备份用bcp 速度很快 bcp pubs..authers out authers.txt -Usa 用 cmd/c 可以直接调用
2.不是很明白你的问题。是指这段时间内增加的数据?如果有一个字段就好办: select * from tbl where FDate Between 2001-2-3 And 2002-6-7
var i:integer;
tss :TStringList;
ts :string;
begin
if (oData = nil) or oData.IsEmpty then Exit;
ts := TStringList.Create;
with oData do
begin
while not Eof do
begin
ts := '';
for i :=0 to Fields.Count -1 do
ts := ts + Fields[i].AsString +#8; //Tab间隔
Delete(ts, length(ts), 1);
tss.Add(ts);
Next;
end;
end;
tss.SaveToFile(psFile);
tss.Free;
end;
bcp pubs..authers out authers.txt -Usa
用 cmd/c 可以直接调用