Return a four-digit year (a number from 1900 to 9999) for a given date value.
Syntax Year(date_value) Key date_value A valid date.
Dim intDemo
intDemo = Year(dtmShiftEnd)
intDemo = Year(#31/12/2012#)
Select * from orders where Year(Order_date) = 2012;
In VBScript return the current date in ISO8601 format:
Function isoDate() ' This script uses the functions Day, Month, and Year because ' they do not rely on the user’s regional settings. dtmNow = Date() dtmDay = Day(dtmNow) dtmMonth = Month(dtmNow) dtmYear = Year(dtmNow) isoDate = dtmYear & "-" & dtmMonth & "-" & dtmDay End Function
“I’m spending a year dead for tax reasons” ~ Douglas Adams
Day - Return the day of the month.
DatePart - Return part of a given date.
Month - Return the month for a given date.
GetDate.vbs - Return the current Year/month/Day and time.