dd = Date() '今天
dd = dateadd("m",1,dd) '月份加1
dd = Cdate(Year(dd) & "-" & Month(dd) & "-1") '下月的第一天
dd=dateadd("d",dd,-1) '本月的最后一天
dd=day(dd) '本月的天数
Response.Write(dd)
由 dawei
【声明】：淮南站长网内容转载自互联网，其相关言论仅代表作者个人观点绝非权威，不代表本站立场。如您发现内容存在版权问题，请提交相关链接至邮箱：bqsm@foxmail.com，我们将及时予以处理。