<% option explicit %> <% Response.Buffer = true %> <% Response.CacheControl = "no-cache" %> <% if trim(session("SiteID")) = "" then Response.Redirect "logout.html" end if %> "> " rel=stylesheet type=text/css> " text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <% '----------- generating page ----- start arrtags = session("arrtags") arrtemplate = session("arrtemplate") for ctr = 0 to ubound(arrtags) if arrtags(ctr) = template_header then Response.Write arrtemplate(ctr) %> <% elseif arrtags(ctr) = template_qnews then Response.Write arrtemplate(ctr) %> <% elseif arrtags(ctr) = template_generalinfo then Response.Write arrtemplate(ctr) %> <% elseif arrtags(ctr) = template_pagedetails then Response.Write arrtemplate(ctr) %> <% elseif arrtags(ctr) = template_footer then Response.Write arrtemplate(ctr) %> <% end if next '----------- generating page ----- end %>