当前位置 博文首页 > 使用VBS获取当前日期的前一天 并修正输出格式

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

    作者:admin 时间:2021-02-04 21:06

    获取当前日期方法一:

    复制代码 代码如下:

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

    js
    下一篇:没有了