<%@ LANGUAGE="VBSCRIPT"%> <%Response.Buffer = True%> <% Areanum = Request.QueryString("area") %>
  <%If Request.QueryString("Search") = "" Then%> <% Call DisplayNews %> <% Else %> <%End If%>
<% Writefooter %>