<% Response.Expires = 0 %> <% sel = Cint(Request("sel")) %> <% i = 1 %> <% while (i < 3) %> <% if (i = sel) then %> <% else %> <% end if %> <% i = (i+1) %> <% wend %>