使用VBS獲取當(dāng)前日期的前一天 并修正輸出格式
獲取當(dāng)前日期方法一:
Currentdate1=date()
msgbox Currentdate1
獲取當(dāng)前日期方法二:
Currentdate2=year(Now)&"-"&Month(Now)&"-"&day(Now)
msgbox Currentdate2
補(bǔ)充一個(gè):如果想獲取的日期前面是1位數(shù)的前面補(bǔ)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)
獲取當(dāng)前時(shí)間:
CurrentTime=Hour(Now)&":"&Minute(Now)&":"&Second(Now)
m = "當(dāng)前時(shí)間"& CurrentTime
msgbox m
windows下使用VBS取當(dāng)前日期的前一天,并修正輸出格式
my_date1 = DateAdd("d",-1,date)
作用:取當(dāng)前時(shí)間的前一天(當(dāng)前時(shí)間以系統(tǒng)時(shí)間為準(zhǔn))并將結(jié)果賦予變量my_date1
my_date2 = DatePart("yyyy",my_date1) & "-" & Right("0" & DatePart("m",my_date1), 2) & "-" & Right("0" & DatePart("d",my_date1),2)
作用:不考慮系統(tǒng)設(shè)定的時(shí)間格式(默認(rèn)為YYYY/M/D),修改輸出時(shí)間格式為YYYY-MM-DD,并將結(jié)果賦予變量my_date2
查看輸出的時(shí)間:
msgbox my_date1
msgbox my_date2
以上腳本在windows2003、2008下測試通過
相關(guān)文章
Adsutil.vbs 在腳本攻擊中的妙用[我非我原創(chuàng)]
Adsutil.vbs 在腳本攻擊中的妙用[我非我原創(chuàng)]...2007-03-03用VBS調(diào)用程序并對(duì)程序的運(yùn)行情況進(jìn)行監(jiān)控的兩個(gè)代碼
用VBS調(diào)用程序并對(duì)程序的運(yùn)行情況進(jìn)行監(jiān)控的兩個(gè)代碼...2007-03-03vbs實(shí)現(xiàn)的定時(shí)關(guān)機(jī)、重啟的腳本和程序
用vbs實(shí)現(xiàn)的定時(shí)關(guān)機(jī)重啟的腳本,沒想到haiwa2005年就寫了這個(gè)東西,原理就是調(diào)用了shutdown和vbs的延時(shí)功能2008-06-06vbs(asp) ByVal ByRef函數(shù)調(diào)用使用說明
ByVal 傳送參數(shù)內(nèi)存的一個(gè)拷貝給被調(diào)用者。也就是說,棧中壓入的直接就是所傳的值。 ByRef 傳送參數(shù)內(nèi)存的實(shí)際地址給被調(diào)用者。也就是說,棧中壓入的是實(shí)際內(nèi)容的地址。被調(diào)用者可以直接更改該地址中的內(nèi)容。2008-09-09windows.關(guān)于設(shè)置腳本的一些基本方法原則
windows.關(guān)于設(shè)置腳本的一些基本方法原則...2007-03-03VBS教程:函數(shù)-FormatDateTime 函數(shù)
VBS教程:函數(shù)-FormatDateTime 函數(shù)...2006-11-11