<%@LANGUAGE="VBSCRIPT"%> <% Option explicit Response.Buffer = FALSE '===================================================== '| | '| REPORTS | '| | '===================================================== ' Good idea to set when using redirect Response.Expires = 0 ' always load the page, dont store %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ Variable Definition ------------- Dim Section Dim parGroup Dim parRepNum Dim parPrint Dim parRtag_id '------------ Constants Declaration ----------- Const img_Advanced_Search = "" Const img_Admin_Reports = "" Const img_Reports = "" '------------ Variable Init ------------------- parGroup = Request("group") parRepNum = Request("repnum") parPrint = Request("print") parRtag_id = Request("rtag_id") '---------------------------------------------- %> <% Function Set_Row_Style ( SSLink ) Set_Row_Style = "onMouseOver=""this.bgColor = '"& hlColor &"'"" onMouseOut =""this.bgColor = ''"" onClick=""location.href='"& SSLink &"'""" End Function %> <% '------------------------- MAIN LINE --------------------------- %> ">

	Exit   <%Section = "TITLE"%>   <%Section = "FORM"%> <%Section = "BODY"%>