如何将文件中的记录写入数据库中，使用ADO(100分)

  • 主题发起人 主题发起人 fanhongwei
  • 开始时间 开始时间
F

fanhongwei

Unregistered / Unconfirmed
GUEST, unregistred user!
我使用ADOQuery将数据库中的记录生成文件，代码如下：
with ADOQuery1 do
begin
SQL.Clear;
SQL.Add(mS2);
Open;
SaveToFile(mS4, pfADTG);
Close;
ListBox1.Items.Add('数据备份成功！');
Application.ProcessMessages;
end;
现在我不知道如何将文件中的数据转回数据库，请大家帮忙！
给出源代码
 
我也想知道。
 
用LoadFromFile
 
To :Faller
可以给出源代码吗
 
靠,跟loadFromfile 与savetofile一写的
adoquery1.loadFromfile(filename)
 
使用adoquery1.loadFromfile(filename)无法将记录返回到数据库中。
 
谁可以帮忙
 
直接调就可以了。
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
with adoquery1 do
begin
ConnectionString:=getVFConnStr('d:/tree');
SQL.Add('select * from gypcbz');
open;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
adoquery1.SaveToFile('d:/aaa.txt');
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
adoquery1.close;
adoquery1.LoadFromFile('d:/aaa.txt');
end;
 
另一个 query 什么也不要设，直接调：

procedure TForm1.Button3Click(Sender: TObject);
begin
adoquery2.close;
adoquery2.LoadFromFile('d:/aaa.txt');
end;
 
jsxjd 老兄 恐怕不行吧？
 
"使用adoquery1.loadFromfile(filename)无法将记录返回到数据库中"
的确，这样只是到入了数据集，没有倒如最终的数据表
 
谢谢大家，我自己搞定了
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

S
[教程]使用 TQJsonOutputChannel 写入 JSON 数据到流中
回复
0
查看
799
swish
S
X
在datasnap 中使用unidac 访问数据（客户端） - xalion
回复
0
查看
762
xalion
X
X
在datasnap 中使用unidac 访问数据（服务器端） - xalion
回复
0
查看
936
xalion
X
X
如何在unidac 中执行一次查询获得多个数据集？ - xalion
回复
0
查看
944
xalion
X
X
使用kbmmw中的随机数替换delphi 10.3 自带的随机数 - xalion
回复
0
查看
713
xalion
X
后退
顶部