vbs获取上月的最后一天及本月的最后天

由于项目需要，需要取本月的最后一天，度娘后找到以下代码，非原创，做好记录，以后好用；

上月第一天：<%=dateadd("m",-1,year(date)&"-"&month(date)&"-1")%>
上月最后一天：<%=dateadd("d",-1,year(date)&"-"&month(date)&"-1")%>
本月第一天：<%=year(date)&"-"&month(date)&"-1"%>
本月最后一天：<%=dateadd("d",-1,dateadd("m",1,year(date)&"-"&month(date)&"-1"))%>
下月第一天：<%=dateadd("m",1,year(date)&"-"&month(date)&"-01")%>
下月最后一天：<%=dateadd("d",-1,dateadd("m",2,year(date)&"-"&month(date)&"-01"))%>

参照地址：ASP获取上月本月下月的第一天和最后一天_后除的博客-CSDN博客上月第一天：上月最后一天：本月第一天：本月最后一天：下月第一天：下月最后一天：https://blog.csdn.net/mazeyqian/article/details/72312374