XML ASP.Net Tutorial

<%@ Page Language="VB" %>
<%@ Import Namespace="System.Xml" %>
<%@ Import Namespace="System.Xml.XPath" %>
<%@ Import Namespace="System.Xml.Xsl" %>

   sub Page_Load(Sender as Object, e as EventArgs)
      Dim objReader as New XmlTextReader(Server.MapPath("Data.xml"))
      
      Dim objDoc as XPathDocument = new XPathDocument(objReader)
      
      Dim objXSLT As XslTransform = New XslTransform()
      dim objWriter as XmlTextWriter = new XmlTextWriter(Server.MapPath("output.html"), nothing)
      try
         objXSLT.Load(Server.MapPath("Data.xsl"))
         dim objReader2 as XmlReader = objXslT.Transform(objDoc, nothing)
         While objReader2.Read()
            Response.Write("" & objReader2.Name & " " & _
               objReader2.Value & "
")
         End While
      catch ex As Exception        
         Response.Write(ex.Message)
      finally
         objReader.Close
         objWriter.Close
      end try
   end sub   



File: Data.xml


  
    asdf
    
      asdf
      asdf
    

    asdf
  
  
    asdf
    
      asdf
      asdf
    

    asdf
  
  
    asdf
    
      asdf
      asdf
    

    asdf
  

File: Data.xsl

   xmlns:op="x-schema:books.xdr"
   version="1.0" >
   
      
      
      
         Title
         Price