怎么将txt文件转化成xml文件,又怎么读取xml文件的内容 将其存入数据库中

怎么将txt文件转化成xml文件,又怎么读取xml文件的内容 将其存入数据库中,第1张

1 读入文件内容,将xxx,xxx,xxx的格式保存到某个字符串变量,

2 用Stringstoken将这些变量转换成数组保存

3 XML的文件读写一般都用dom4j来实现,用dom4j将数组中的内容按照你所需要的格式生成xml文件,给那个方法调用即可

DOM4J的一个例子

import orgdom4jAttribute;

import orgdom4jDocumentException;

import orgdom4jDocumentHelper;

import orgdom4jElement;

//创建一个Xml文件

Element user=DocumentHelpercreateElement("User");

useraddAttribute("type", "user");

useraddElement("name")addAttribute("type", "PinYin")setText("Julysea");

useraddElement("age")setText("29");

String oneXml=userasXML();

BufferedWriter out=new BufferedWriter(new FileWriter("oneXmlxml"));

outwrite(oneXml);

outclose();

//将Xml保存为1xml

Uses msxmldom, XMLDoc, XMLIntf;

procedure TForm1Button1Click(Sender: TObject);

var

XMLDoc: TXMLDocument;

IXMLDoc: IXMLDocument;

Root_Node: IXMLNode;

Parent_Node: IXMLNode;

Child_Node: IXMLNode;

dateb,Ser:string;

begin

Try

XMLDoc:= TXMLDocumentCreate(nil);

IXMLDoc:= XMLDoc;

try

XMLDocLoadFromFile(pchar(ExtractFilePath(ApplicationExeName))+'1xml');

XMLDocActive:= True;

XMLDocEncoding:= 'GB2312';

Root_Node:= XMLDocDocumentElement;

if Root_Node = nil then

Exit;

Parent_Node:= Root_NodeChildNodesFirst;

Child_Node:= Parent_NodeChildNodesFirst;

dateb:=Child_NodeAttributes['Database'];

Ser:=Child_NodeAttributes['Server'];

ApplicationMessageBox(Pchar('Database:'+dateb+'Server:'+Server),'提醒',0);

finally

IXMLDOC:= nil;

XMLDoc:= nil;

XMLDocFree;

end;

Except End;

end;

//Delphi 70 下调试通过

1首先,我们正常使用Excel的另存为,看看能否顺利地直接另存为XML文件。

方法:

点击Excel左上角按钮,在d出的选项中,点击“另存为”

或者直接在Excel中按下快捷键F12

2选择最后一项:其他格式。

3接下来,重命名一下文件名,并选择文件类型为:

XML数据(xml)

4点击“保存”按钮,会出现如下错误警告:

因为工作簿不包含任何XML映射,所以无法保存任何XML数据。

单击“帮助”以获取详细信息。

5这个原因是我们的工作簿只是普通的Excel数据,的确没有做过XML映射,或者Excel数据也不是从XML文件导入的。

这时,我们尝试另存为另一种文件类型:

XML电子表格2003(xml)

6点击保存按钮。

7这时会d出一个兼容性对话框,问你是否保持工作簿的这种格式。

8点击“是”,即可将Excel保存为XML格式的文档了。

我们使用软件打开这个XML文档(例如通过Chrome浏览器),发现格式正常,Excel数据也全在里面。

以上就是关于怎么将txt文件转化成xml文件,又怎么读取xml文件的内容 将其存入数据库中全部的内容,包括:怎么将txt文件转化成xml文件,又怎么读取xml文件的内容 将其存入数据库中、delphi如何读取xml文件中的内容 xml文件如下,如何读出 Database="TPASYS" Server="ERPS"、如何通过读取XML配置文件导入Excel文件到数据中等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/10130325.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存