VBScript Reference Manual for InduSoft Web Studio

VBScript Reference Manual InduSoft Web Studio
Date
Description Returns a Variant of subtype Date indicating the current system date.
Usage dateVal = Date
Arguments none
Return Returns a Variant subtype Date
Remarks The locale setting can be specified to use the dash “-“ or the forward slash “/” as a separator
See Also Now, Time
Example Dim Mydate
MyDate = Date ‘ Mydate contains the current system date
MsgBox Date
DateAdd
Description Returns a date to which a specified time interval has been added or subtracted
Usage dateVal = DateAdd(interval, number, date)
Arguments interval
Required. String expression that is the interval you want to add. .
number
Required. Numeric expression that is the number of interval you want to add. The numeric
expression can either be positive, for dates in the future, or negative, for dates in the past.
date
Required. Variant or Date literal representing the date to which interval is added
Settings The interval argument can have the following values:
Setting Description
yyyy Year
q Quarter
m Month
y Day of year
d Day
w Weekday
ww Week of Year
h Hour
n Minute
s Second
Return A Date value
Remarks You can use the DateAdd function to add or subtract a specified time interval from a date. For
example, you can use DateAdd to calculate a date 30 days from today or a time 45 minutes from
now. To add days to date, you can use Day of Year ("y"), Day ("d"), or Weekday ("w").
The DateAdd function won't return an invalid date. If the calculated date would precede the year
100, an error occurs. If number isn't a Long value, it is rounded to the nearest whole number
before being evaluated.
DateAdd is internationally aware, meaning the return value is based on the locale setting on the
local machine. Included in the locale settings are the appropriate date and time separators, the
dates in the correct order of day, month and year.
See Also DateDiff, DatePart
Example The following example adds one month to January 31: In this case, DateAdd returns 28-Feb-95,
not 31-Feb-95. If date is 31-Jan-96, it returns 29-Feb-96 because 1996 is a leap year.
NewDate = DateAdd("m", 1, "31-Jan-95")
124 InduSoft, Ltd.