DateSerial Function

Office VBScript