獲取當前日期方法一：
復制代碼代碼如下:
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下測試通過
