<% ' Global user functions ' Page Loading event Sub Page_Loading() '***Response.Write "Page Loading" End Sub ' Page Unloaded event Sub Page_Unloaded() '***Response.Write "Page Unloaded" End Sub %>