<%@ Register TagPrefix="xigla" TagName="anm" Src="xlagc.ascx" %>

<% for x=1 to 12 if x=month(date1) then sel=" selected" else sel="" response.write("" & right("0" & x ,2) & "") next %> / <% for x=1 to 31 if x=day(date1) then sel=" selected" else sel="" response.write("" & right("0" & x ,2) & "") next %> / <% for x=year(newnow)-20 to year(newnow)+20 if x=year(date1) then sel=" selected" else sel="" response.write("" & x & "" ) next %>