有两文件:
objXML.asp:测试文件
clsXML.asp:vbs类文件
代码:
objXML.asp
%@ Language=VBScript %
% Option Explicit %
!--#INCLUDE FILE="clsXML.asp"--
%
Dim objXML, strPath, str
Set objXML = New clsXML
strPath = Server.MapPath(".") & "New.xml"
objXML.createFile strPath, "Root"
'Or If using an existing XML file:
'objXML.File = "C:File.xml"
objXML.createRootChild "Images"
'Here only one attribute is added to the Images/Image Node
objXML.createChildNodeWAttr "Images", "Image", "id", "1"<...[ 查看全文 ]