VBScript. Функция DateSerial

Возвращает вариант с подтипом Date для указанного года, месяца и дня.

 DateSerial(year, month, day)

Если значение аргумента выходит за пределы допустимого диапазона в большую или меньшую сторону, то следующий по порядку аргумент увеличивается или уменьшается соответственно. Поясним сказанное на примерах:

 Dim MyDate
 MyDate = DateSerial(2005, 12, 31) ' 31 декабря 2005 г.
 MyDate = DateSerial(2005, 12, 140)' 19 апреля 2006 г.
 MyDate = DateSerial(2005, -5, -20)' 10 июня 2006 г.

Значения аргумента year от 0 до 99 включительно интерпретируются, как года в диапазоне 1900-1999. В остальных случаях следует задавать год полностью, четырехзначным числом.

Если значение аргумента выходит за границы диапазона от -32768 до 32767 или результат функции не является корректной датой, генерируется ошибка.

См. также

• DateValue