以文本方式查看主题

-  中文XML论坛 - 专业的XML技术讨论区  (http://bbs.xml.org.cn/index.asp)
--  『 XML在行业中的应用 』  (http://bbs.xml.org.cn/list.asp?boardid=34)
----  VB6.0中为XML文档添加encoding项为什么总是不成功?[求助]  (http://bbs.xml.org.cn/dispbbs.asp?boardid=34&rootid=&id=38767)

--  作者：cageling
--  发布时间：10/11/2006 11:42:00 AM

--  VB6.0中为XML文档添加encoding项为什么总是不成功?[求助]
运行环境: VB6.0 + MSXML4.0
想实现的功能: 在VB6.0中用代码实现自动生成XML文件

遇到的问题:
XML文件首行格式要求如下：
<?xml version="1.0" encoding="UTF-8" ?>
即要求包含"版本号"和"编码类型"
但我用如下方法：
dim xml_document as DOMDocument40
dim xml_node as IXMLDOMProcessingInstruction
Set xml_document = New DOMDocument40
Set xml_node = xml_document.createProcessingInstruction("xml", " version='1.0' encoding='UTF-8'")
Set xml_node = xml_document.insertBefore(xml_node, xml_document.childNodes.Item(0))
发现只能得到：
<?xml version="1.0"?>
即无法成功添加encoding项

上网找了很多资料,发现他们很多就是直接像上面那样用的,但为什么我总是不能成功添加呢?

请各位大虾指点!谢谢!!!

--  作者：cageling
--  发布时间：10/11/2006 12:20:00 PM

--  
哈哈,此问题已经解决!
发现调用 DOMDocument 对象上的 XML 属性只会返回
<?xml version="1.0"?>
但调用xml_document.save ("test.xml")后
生成的文件中已是:
<?xml version="1.0" encoding="UTF-8" ?>

W 3 C h i n a ( since 2003 ) 旗 下 站 点
苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》
 46.875ms