獲取當前日期方法一：
復制代碼 代碼如下:
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=ystrmstrdstr
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下測試通過
您可能感興趣的文章:- 用VBSrcipt判斷是否是日期
- 用vbs實現按創建日期的順序列出一個文件夾中的所有文件
- 用vbs判斷一個日期是否在指定的時段內
- 用vbs實現的簡單的服務器文件備份辦法壓縮文件名自動按日期命名
- vbs下通過日期查找文件夾的代碼
- VBS的字符串及日期操作相關函數
- 用VBS修改（設置）系統時間和日期的代碼
- vbs獲取當前時間日期的代碼
