asp中:Dom操作xml文件的问题！请帮忙！

[bitipierce]

这个地方我的appendchild（）用的有问题，请帮忙找找错误！

'函数：添加条目
Function AddPersonData(oXMLCode)
Dim sourceFile,xObj1,xObj2
Dim rootNode,newNode,currentNode

AddPersonData = 0

sourceFile = Request.ServerVariables("APPL_PHYSICAL_PATH") & "IntroDir.xml"
Set xObj1 = Server.CreateObject("Microsoft.XMLDOM")
Set xObj2 = Server.CreateObject("Microsoft.XMLDOM")

xObj1.load(sourceFile)
Set rootNode = xObj1.documentElement

If Not IsObject(rootNode) Then
Exit Function
End if

xObj2.load(oXMLCode)
Set newNode = xObj2.documentElement
Set currentNode = rootNode.appendChild(newNode)

xObj1.save(sourceFile)

Set xObj1 = nothing
Set xObj2 = nothing

AddPersonData = 1
End Function

其中：oXMLCode是一个新增节点信息，具体内容如下：
Dim Title,Tips,LinkSrc
Title = Request.Form("title")
Tips = Request.Form("tips")
LinkSrc = Request.Form("linksrc")
Dim XMLCode
XMLCode = " "
XMLCode = XMLCode & "<条目>"
XMLCode = XMLCode & "<标题>" & Title & "</标题>"
XMLCode = XMLCode & "<链接>" & LinkSrc & "</链接>"
XMLCode = XMLCode & "<说明>" & Tips & "</说明>"
XMLCode = XMLCode & "</条目>"


为什么我在调用AddPersonData时指示：rootNode.appendChild 不能进行？

谢谢了！

[bitipierce]

up!

[ssm1226]

xObj2.load(oXMLCode)

==>
xObj2.loadXML(oXMLCode)

[bitipierce]

谢谢楼上!赫赫,我糊涂了！
我没有分，但还是给你20！意思一下！

附加：楼上可否指点一下我怎么学习dom，参考什么资料呢？