欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

使用VBS获取当前日期的前一天 并修正输出格式

程序员文章站 2022-06-25 08:58:14
获取当前日期方法一: 复制代码 代码如下: currentdate1=date() msgbox currentdate1 获取当前日期方法二: 复制代码 代...

获取当前日期方法一:

复制代码 代码如下:

currentdate1=date()
msgbox currentdate1

获取当前日期方法二:

复制代码 代码如下:

currentdate2=year(now)&"-"&month(now)&"-"&day(now)
msgbox currentdate2

补充一个:如果想获取的日期前面是1位数的前面补0的写法,例如 2016年5月16,如果目录是2016516不如20160516更好

复制代码 代码如下:

ystr=year(now)
mstr=month(now)
if len(mstr)<2 then mstr="0"&mstr
dstr=day(now)
dateml=ystr&mstr&dstr
msgbox(dateml)

获取当前时间:

复制代码 代码如下:

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下测试通过