獲取當(dāng)前日期方法一：
復(fù)制代碼 代碼如下:
Currentdate1=date()
msgbox Currentdate1
獲取當(dāng)前日期方法二：
復(fù)制代碼 代碼如下:
Currentdate2=year(Now)"-"Month(Now)"-"day(Now)
msgbox Currentdate2
補(bǔ)充一個(gè)：如果想獲取的日期前面是1位數(shù)的前面補(bǔ)0的寫法，例如 2016年5月16，如果目錄是2016516不如20160516更好
復(fù)制代碼 代碼如下:
ystr=year(Now)
mstr=Month(Now)
if len(mstr)2 then mstr="0"mstr
dstr=day(Now)
dateml=ystrmstrdstr
msgbox(dateml)
獲取當(dāng)前時(shí)間：
復(fù)制代碼 代碼如下:
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下測(cè)試通過
您可能感興趣的文章:- 用VBSrcipt判斷是否是日期
- 用vbs實(shí)現(xiàn)按創(chuàng)建日期的順序列出一個(gè)文件夾中的所有文件
- 用vbs判斷一個(gè)日期是否在指定的時(shí)段內(nèi)
- 用vbs實(shí)現(xiàn)的簡單的服務(wù)器文件備份辦法壓縮文件名自動(dòng)按日期命名
- vbs下通過日期查找文件夾的代碼
- VBS的字符串及日期操作相關(guān)函數(shù)
- 用VBS修改（設(shè)置）系統(tǒng)時(shí)間和日期的代碼
- vbs獲取當(dāng)前時(shí)間日期的代碼
