<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" content="text/html" charset="UTF-8"/>
<TITLE>SQL-XML by Example - SQLXML.asp</TITLE>

<XML ID=CatalogIsle>
<Catalog xmlns:sql="urn:schemas-microsoft-com:xml-sql">
<Category CategoryName="Beverages">
<Product ProductName="Chai"/>
<Product ProductName="Chang"/>
<Product ProductName="Chartreuse verte"/>
<Product ProductName="Côte de Blaye"/>
<Product ProductName="Guaraná Fantástica"/>
<Product ProductName="Ipoh Coffee"/>
<Product ProductName="Lakkalikööri"/>
<Product ProductName="Laughing Lumberjack Lager"/>
<Product ProductName="Outback Lager"/>
<Product ProductName="Rhönbräu Klosterbier"/>
<Product ProductName="Sasquatch Ale"/>
<Product ProductName="Steeleye Stout"/>
</Category>
<Category CategoryName="Condiments">
<Product ProductName="Aniseed Syrup"/>
<Product ProductName="Chef Anton&apos;s Cajun Seasoning"/>
<Product ProductName="Chef Anton&apos;s Gumbo Mix"/>
<Product ProductName="Genen Shouyu"/>
<Product ProductName="Grandma&apos;s Boysenberry Spread"/>
<Product ProductName="Gula Malacca"/>
<Product ProductName="Louisiana Fiery Hot Pepper Sauce"/>
<Product ProductName="Louisiana Hot Spiced Okra"/>
<Product ProductName="Northwoods Cranberry Sauce"/>
<Product ProductName="Original Frankfurter grüne Soße"/>
<Product ProductName="Sirop d&apos;érable"/>
<Product ProductName="Vegie-spread"/>
</Category>
</Catalog>
</XML>

<SCRIPT language="VBScript" For="window" Event="onload">

  Dim xmlDoc
  dim OutputXML
  Set xmlDoc = CatalogIsle.XMLDocument

  Dim root, CChild, PChild
  Set root = xmlDoc.documentElement

  For each CChild in root.childNodes
    OutputXML = document.all("log").innerHTML
    document.all("log").innerHTML = OutputXML & "<LI><B>" &
CChild.getAttribute("CategoryName") & "</B></LI>"

    For each PChild in CChild.childNodes
      OutputXML = document.all("log").innerHTML
      document.all("log").innerHTML = OutputXML & "<UL>" &
PChild.getAttribute("ProductName") & "</UL>"
    Next
  Next
</SCRIPT>
</HEAD>
<BODY>
  <H1>SQL-XML by Example</H1>
  <H3>This is the Product Catalog for categories 1 and 2</H3>
  <UL id=log>
  </UL>
</BODY>
</HTML>