Fórum Salvar XML no Banco de Dados #383591
13/08/2010
0
Tenho uma aplicação onde o vendedor possui um notebook e sai efetuando vendas e quando ele volta pra empresa, pego as vendas dele (XML padrao borland) e carrego no sistema da empresa (cds.Load...). Só que não consigo postar esses novos dados no banco, ele fica só em memória. Gostaria de importar esse XML e gravar no banco.
Grato pela ajuda.
Att.
Isandro Rogério
Curtir tópico
+ 0Post mais votado
13/08/2010
procedure TForm3.SalvandoOdelta(Sender: TObject);
var
cds:TClientDataSet;
begin
cds:=TClientDataSet.Create(nil);
cds.Data:=ClientDataSet1.Delta;
cds.SaveToFile('C:\zPodeApagar\Exemplo.xml', dfXMLUTF8); //salvando o Delta
cds.Free;
ClientDataSet1.MergeChangeLog;
ClientDataSet1.Close;
end;
procedure TForm3.RecuperandoDelta(Sender: TObject);
begin
Cds:=TClientDataSet.Create(self);
try
cds.Close;
EMPLOYEE_2_1_FDB.KeepConnection:=True; //Abre a conexão
cds.LoadFromFile('C:\zPodeApagar\Exemplo.xml');
cds.Open;
ClientDataSet1.Data:=cds.Delta; //recuperando o Delta
ClientDataSet1.ApplyUpdates(0); //persistindo as alteraçoes
finally
cds.Free;
end;
end;
Marco Salles
Gostei + 1
Mais Posts
13/08/2010
Eriley Barbosa
Gostei + 0
13/08/2010
Isandro Rogério
mas valeu a resposta.
att
Gostei + 0
13/08/2010
Marcos Iwazaki
Gostei + 0
13/08/2010
Isandro Rogério
entendeu?
;)
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)