在ASP中附加到XML

Question

我试图在ASP Classic中添加XML，而我在网上发现的代码似乎并不适合我。以下是我用来测试的代码：

Set objxml2 = Server.CreateObject("MSXML2.DOMDocument.3.0")
objxml2.async = False
objxml2.load (server.mappath("organizations.xml"))

Set node = objxml2.createElement("organization")
objxml2.documentElement.AppendChild node

Set typeEl = objxml2.createElement("type")
typeEl.Text = "TheType"
node.AppendChild typeEl

Set objxml2 = Nothing
node = Nothing
Set typeEl = Nothing

XML文件organizational.xml如下所示：

<?xml version="1.0" encoding="UTF-8"?>
<Data>
</Data>

当我运行代码时，我不会在浏览器上出现任何错误，但代码不会显示在文件中。我追加而不是创建新文件的原因是因为这将是一个持续不断更新的列表。我正确接近这个吗？

Answer 1

您必须在追加后和将对象设置为空之前保存文档：

objxml2.save(server.mappath("organizations.xml"))