<%'这里是一个月的表单jiange=DateDiff("d","2008-11-01","2008-12-01")jin=day(now())for i=1 to jiangeif i<=jin thenresponse.Write ""elseexit forend if next%>是否可以解决您的问题?