实现xml代码的方法！

可以用asp 的写法 按格式输出对应的标签就可以了

response.write "<product>"

response.write "<title value='Product 01' />"

response.write "<content>www.fxdaima.com</content>"

response.write "<thumb value='thumb/thumb1.jpg' />"

response.write "<image value='image/image1.jpg' />"

</product>

<product>

楼上的朋友可以说的详细一点吗，我是想写到xml页面里面 ，怎么样调用xml 页面

引用 2 楼 cruise007 的回复:

楼上的朋友可以说的详细一点吗，我是想写到xml页面里面 ，怎么样调用xml 页面

就是在asp 页面里面只要按照 XMl的格式输出就行了。按对应的标签输出，页面上显示的还是Xml，如果要获取的话，可以用ServerXMLHTTP 对象获取。你试试看。

我的意思在asp 页面写好的 格式怎么保存到 xml页面里面 怎么写！

<%  
'----------------------------------------------------------------  
'程序简介: 完成asp语言对XML文档中指定节点文本的增加、删除、修改、查看  
'入口参数: 无  
'出口参数: 无  
'------------------------------------------------  
'函数名字：ConnectXml()  
'入口参数: filename 需要连接或打开的xml文件名  
'出口参数: 无  
'返回值 ：ConnectXml=0，XMLMorntekDocument就是一个成功装载XML文档的对象了。  
' ConnectXml<>0,则打印错误信息strError  
'------------------------------------------------  
class aspXML
dim XMLMorntekDocument  

dim strSourceFile

function ConnectXml(filename)  
strSourceFile=Server.MapPath(filename)  
Set XMLMorntekDocument = Server.CreateObject("Microsoft.XMLDOM")  
XMLMorntekDocument.async = false  
XMLMorntekDocument.load(strSourceFile)  
ConnectXml=XMLMorntekDocument.parseerror.errorcode  
if XMLMorntekDocument.parseerror.errorcode<>0 then  
strError="<h2>error"&XMLMorntekDocument.parseerror.errorcode&"</h2>"  
strError=strError&XMLMorntekDocument.parseerror.reason&"<br>"  
strError=strError&XMLMorntekDocument.parseerror.url&"<br>"  
strError=strError&XMLMorntekDocument.parseerror.line&"<br>"  
strError=strError&XMLMorntekDocument.parseerror.filepos&"<br>"  
strError=strError&XMLMorntekDocument.parseerror.srcText&"<br>"  
response.write strError  
end if  
end function  

'------------------------------------------------  
'函数名字：CloseXml()  
'入口参数: 无  
'出口参数: 无  
'------------------------------------------------  
function CloseXml(XMLMorntekDocument)  
if IsObject(XMLMorntekDocument) then  
set XMLMorntekDocument=nothing  
end if  
end function  


'------------------------------------------------  
'函数名字：SelectXmlNodeText(elementname)  
'入口参数: elementname 元素的名字  
'出口参数: 无  
'------------------------------------------------  
function SelectXmlNodeText(elementname)  
elementname="//"&elementname  
temp=XMLMorntekDocument.selectSingleNode(elementname).text  
selectXmlNodeText= server.htmlencode(temp)  

end function  

'------------------------------------------------  
'函数名字：InsertXmlNodeText(befelementname,elementname,elementtext)  
'入口参数: elementname 插入的元素的名字  
' befelementname在此元素的名字前面插入元素  
' elementtext 插入的元素的文本  
'出口参数: 无  
'------------------------------------------------  
function InsertXmlNodeText(befelementname,elementname,elementtext)  
dim befelement,element  
set befelement=XMLMorntekDocument.selectSingleNode("//"&befelementname)  
set element= XMLMorntekDocument.createelement(elementname)  
befelement.insertBefore element,befelement.firstchild  
element.text=elementtext  
end function  

'------------------------------------------------  
'函数名字：UpdateXmlNodeText(elementname,newelementtext)  
'入口参数: elementname 元素的名字  
' newelementtext元素的新文本  
'出口参数: 无  
'------------------------------------------------  
function UpdateXmlNodeText(elementname,newelementtext)  
dim element  
set element=XMLMorntekDocument.selectSingleNode("//"&elementname)  
element.text=newelementtext  
XMLMorntekDocument.Save(strSourceFile)
end function  

'------------------------------------------------  
'函数名字：DeleteXmlNodeText(elementname)  
'入口参数: elementname 元素的名字  
'出口参数: 无  
'------------------------------------------------  
function DeleteXmlNodeText(elementname)  
XMLMorntekDocument.selectSingleNode("//"&elementname).text =""  
end function  
end class
%>  


写好的类库，更多请关注www.204080.com