<%
DIM XML
SET XML = Server.createObject ("Microsoft.xmLDom")
Xml.async = FALSE
Xml.Load (Server.MAppath ("XmLDemo1.xml"))
DIM FTEXT1, FTEXT2
FText1 = Xml.documentelement.childNodes (0) .text
FText2 = Xml.documentelement.childNodes (1) .text
Response.write (fText1)
SET XML = Nothing
Response.write ("Sucess")
%>