28,391
社区成员
发帖
与我相关
我的任务
分享
<%dim t,y,tmp
t=datediff("m","2008-10-1","2009-3-29")
y=year("2009-3-29")
m=month("2009-3-29")
response.write "<pre>"
for t=t to 0 step -1
response.write mid(DateSerial(y,m-t,1),1,instrrev(DateSerial(y,m-t,1),"-")-1) &vbcrlf
next
response.write "</pre>"
%>