set xmlDoc = server.createObject("MSXML.DOMDocument")
xmlDoc.async=false
xmlDoc.appendChild(xmlDoc.createElement("xml"))
 
xmlDoc.documentElement.appendChild(xmlDoc.createElement("Data"))
set objnode=xmldoc.selectSingleNode("xml/Data")
 
if not rs.eof then rs.AbsolutePage=Page
   For iPage=1 to rs.PageSize
        if rs.EOF then exit for
        RecNo=(Page-1)*rs.PageSize+iPage
 objnode.appendChild(xmlDoc.createElement("Record"))
     For i=0 to rs.fields.count-1
     objnode.childNodes.item(iPage-1).appendChild(xmlDoc.createElement(rs(i).name))
     objnode.childNodes.item(iPage-1).childNodes.item(i).setAttribute "Name",rs(i).Name
     objnode.childNodes.item(iPage-1).childNodes.item(i).setAttribute "Type",rs(i).Type

' ------------------------------------------------------------------------------------------------------------------
' 如果单纯是文字，这是不会出错的。现在先屏蔽。
    '''objnode.childNodes.item(iPage-1).childNodes.item(i).text=rs(i)  '如果是XML格式的话就出错了

'------------------------------------------------------------------------------------------------------------------
' 出错的地方就是这里。如果第二段值为"<new/>"之类的，就不出错。
     set xmlDoc2 = server.createObject("MSXML.DOMDocument")
     xmlDoc2.loadXML(rs(i))
     objnode.childNodes.item(iPage-1).childNodes.item(i).appendChild(xmlDoc2.documentElement) 
'------------------------------------------------------------------------------------------------------------------
        next
        rs.MoveNext
    Next
 Response.Clear()
 response.contentType = "text/xml"
 response.write(xmlDoc.xml)

字段值是以下：
"<Swf><Swf><SwfComment>功能：图片上传，图片连接和文字说明。</SwfComment><SwfName>NewFilm.swf</SwfName></Swf><Swf><SwfName>Holiday.swf</SwfName><SwfComment>消息更新。</SwfComment></Swf><Swf><SwfComment>主题页面。
功能：专用XML</SwfComment><SwfName>toy.swf</SwfName></Swf></Swf>"

时出现：

无法显示 XML 页。
使用 XSL 样式表无法查看 XML 输入。请更正错误然后单击 刷新按钮，或以后重试。

--------------------------------------------------------------------------------

文本内容中发现无效字符。

请问怎么解决这个问题啊？

不过加进来的都是一大堆符号，能不能把数据确实地“嫁接”进来呢？有没有这个方法呢，请高手指教。