| 内容 | 获取当前日期方法一:
 代码如下:
 Currentdate1=date()
 msgbox Currentdate1
 获取当前日期方法二:
 代码如下:
 Currentdate2=year(Now)&"-"&Month(Now)&"-"&day(Now)
 msgbox Currentdate2
 获取当前时间:
 代码如下:
 CurrentTime=Hour(Now)&":"&Minute(Now)&":"&Second(Now)
 m = "当前时间"& CurrentTime
 msgbox m
 windows下使用VBS取当前日期的前一天,并修正输出格式
 my_date1 = DateAdd("d",-1,date)
 作用:取当前时间的前一天(当前时间以系统时间为准)并将结果赋予变量my_date1
 my_date2 = DatePart("yyyy",my_date1) & "-" & Right("0" & DatePart("m",my_date1), 2) & "-" & Right("0" & DatePart("d",my_date1),2)
 作用:不考虑系统设定的时间格式(默认为YYYY/M/D),修改输出时间格式为YYYY-MM-DD,并将结果赋予变量my_date2
 查看输出的时间:
 msgbox my_date1
 msgbox my_date2
 以上脚本在windows2003、2008下测试通过
 |