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


获取当前日期方法一:

复制代码 代码如下:

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


vbs脚本取前一天日期,格式有问题

my_date1 = DateAdd("d",-1,date)
my_date3 = Right("0" & DatePart("D",my_date1), 2) & "-" & Right("0" & DatePart
("m",my_date1), 2) & "-" & Right(DatePart("yyyy",my_date1), 4)
MSGBOX my_date1& " " & my_date3
 

vbs问题,怎用vbs获取日期

doc.51windows.net/...nt.htm

这是帮助文档!你找一下formatdatetime()函数就可以了!

看一下你就明白了!很简单……

比如获取当前日期formatdatetime(now(),2)
当前时间 formatdatetime(now(),4)

你说的什么21时21日的 能不能明白点 云山雾照的现在

哦,看明白了!!!
比如说获取日期中的21日!

day=day("October 21,2006")

day的值就是21
获取今天的日期并提取出日!!
today=date
myday=day(today)
输出MYDAY后就是日子了!

21时的话用法和day()函数一样,用hour()函数获取!

比如获取当前系统时间的小时

timenow=time
timehour=hour(time)

TIMEHOUR就是小时!
 

评论关闭