<% On Error Resume Next %> <% if (Request.ServerVariables("QUERY_STRING") = "") then %>
<% Session("Counter") = Session("Counter") + 1%>

2

 <% else %>

<% =Session("Counter") %>

 <% end if %>