<% dim anyo anyo=Request.QueryString("anyo") %>