%@ Language=VBScript %> <% session("sel_month")=DatePArt("m", DateAdd("m",1,now)) session("sel_day")=DatePArt("d", DateAdd("m",1,now)) session("sel_year")=DatePArt("yyyy", DateAdd("m",1,now)) if request.querystring("ref")<>"" then session("ref")=request.querystring("ref") %>