> × yaffil ÒÁÂÏÔÁÅÔ ÂÅÚ ÐÒÏÂÌÅÍ. ÄÁ É × ÞÅÍ
> ÚÄÅÓØ ÐÒÏÂÌÅÍÁ? ÃÅÌÁÑ ÞÁÓÔØ ÏÔ ÄÁÔÙ --
> ÜÔÏ ËÏÌÉÞÅÓÔ×Ï ÄÎÅÊ. ÐÏÐÒÏÂÕÊÔÅ ×
> äÅÌÆÉ ÉÌÉ VBScript -- ÜÔÏ ×ÐÏÌÎÅ ÎÏÒÍÁÌØÎÙÅ
> ÐÒÅÏÂÒÁÚÏ×ÁÎÉÑ.
ÐÒÏÂÌÅÍÁ × ÔÏÍ, ÞÔÏÂÙ ÐÏÎÑÔØ, ÞÔÏ ÔÙ ÉÍÅÅÛØ ××ÉÄÕ ÐÏÄ "ÄÁÔÁ ËÁË ÞÉÓÌÏ". Ñ
ÆÉÚÉÞÅÓËÉÊ ÓÍÙÓÌ ÄÁÎÎÏÇÏ ÐÏÎÑÔÉÑ ×ÉÖÕ ÔÏÌØËÏ ÔÁË, ËÁË × ÎÅËÏÔÏÒÙÈ ÑÚÙËÁÈ -
ÓËÏÌØËÏ ÄÎÅÊ ÐÒÏÛÌÏ Ó ËÁËÏÊ-ÔÏ ÔÁÍ ÄÁÔÙ. ÄÙË ÍÏÖÅÔ ËÁË-ÔÏ ÐÏ ÐÒÏÓÔÏÍÕ,
×ÍÅÓÔÏ select cast(current_date as integer) from rdb$database, ÞÔÏ ÎÅ
ÒÁÂÏÔÁÅÔ, ÔÁËÉ É ÉÓÐÏÌØÚÏ×ÁÔØ select current_date-cast('2000-01-01' as date)
from rdb$database. current_date, ËÁË ÇÏ×ÏÒÉÔÓÑ, ÄÌÑ ÐÒÉÍÅÒÁ. ÜÔÏ É ÅÓÔØ ×
ÔÏÞÎÏÓÔÉ ÔÏ, ÞÔÏ ÔÙ ÈÏÞÅÛØ. ÐÒÏÓÔÏ ÐÉÓÁÔØ ÎÁÄÏ ×ÍÅÓÔÏ "ÓÄÅÌÁÊ ÍÎÅ ÉÚ ÄÁÔÙ
ÞÉÓÌÏ" - "ÓÄÅÌÁÊ ÍÎÅ ÉÚ ÄÁÔÙ ÞÉÓÌÏ, ÕÞÉÔÙ×ÁÑ, ÞÔÏ ÌÉÞÎÏ Ñ ÎÕÌÅÍ ÓÞÉÔÁÀ
ÔÁËÏÅ-ÔÏ ÞÉÓÌÏ".
