LISTING 3. Final Function Calls to Send Resultset to Browser

<%
  Dim oRsPrjTree

  '--- Any header for the list box.
  Response.Write( "<B>Project Activity Schedule</B><BR>")

  '--- Get tree as resultset using the wrapper to stored procedure.
  Set oRsPrjTree = GetActivityTreeFromDB

  '--- Construct and render HTML list box from resultset.
  Response.Write( BuildActivityTreeListHTML( oRsPrjTree ))
%>

</BODY>