實例化 Microsoft XMLDOM Object: <% Dim objDom Dim objRoot Dim objChild1 Dim objChild2 Dim objPI Set objDom = Server.CreateObject("Microsoft.XMLDOM") Set objRoot = objDom.createElement("rootElement")
objDom.appendChild objRoot Set objChild1 = objDom.createElement("childElement1")
objRoot.appendChild objChild1 Set objChild2 = objDom.createElement("childElement2")