使用VBS取得目前日期的前一天 並修正輸出格式

取得目前日期方法一：

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 = DateAdd("d",-1,date)

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_date2

以上腳本在windows2003、2008並修正輸出格式相關文章請關注PHP中文網！