<%'Include Data Connection%> <%'Include ADO constants include file for VBScript%> <% 'open data connection OpenConn() %> <% 'display the site map Response.Write DisplaySiteMap() %> <% 'close data connection Call CloseConn() %>