如何将XML文件保存到SQLServer数据库中，并读出。高分在线等！！！！

Question

请问各位大侠，如何将一XML文件保存到SQLServer数据库中。然后再从数据库中读出生成原XML文件。
请大家指点。

Answer 1

干脆不要分离成字段，直接保存到一个Text字段好了，呵呵

Answer 2

你的XML文件结构规范吗？如果不规范，可以像楼上那样做

Answer 3

你的XML文件结构规范吗？
如果不规范可以用XML Mapper 转换成用TClientDateSet可以操作的XML文件，然后再导入到数据库。但是转换成TADODateSet能读取的我没有做过。
Delphi  中XML Mapper的使用：
http://www.nxcn.net/bbs/dispbbs.asp?BoardID=1&ID=901如果再从数据库中读出并保存成xml文件，TClientDateSet和TADODateSet他们所保存的xml格式是不一样的，而且不能互相读取。

Answer 4

如果规范，就简单
//保存
ADODataSet.LoadFromFile('c:\aa.xml');
然后对ADODataSet记录操作，保存到数据库中//还原
ADODataSet.SaveToFile('c:\aa.xml',pfXML);

Answer 5

procedure TForm1.Button1Click(Sender: TObject);var
  myDataSet:TClientDataSet;
begin
  myDataSet := TClientDataSet.Create(application);
  myDataSet.CreateDataSet;          //建立
  myDataSet.Active;
  DataSource1.DataSet := myDataSet;    //再接TDBGrid控件、直接可看
myDataSet.SaveToFile( ExtractFilePath (Application.ExeName) + 'test.xml', dfXML ); //XML形式
end;procedure TForm1.Button2Click(Sender: TObject);var
  myDataSet:TClientDataSet;
begin
  myDataSet := TClientDataSet.Create(application);
  myDataSet.LoadFromFile(ExtractFilePath (Application.ExeName) + 'test.xml'); //读出
  myDataSet.Active;
  DataSource1.DataSet := myDataSet;
end;