Преобразование даты в число

← →
Ameno (2003-03-04 08:15) [0]

Доброе утро, мастера.
У меня такой вопрос, я подключаюсь из Делфи к DBF-нику через ADO используя Microfost DBase драйвер. Все прекрасно, пока не доходит до запроса на выборку по дате. Это зараза никак не хочет принимать дату в виде, например, "03.12.2003" или подобном, пробовал по-разному и перебрал все варианты - хрен!, ругается. Но принимает числовой вариант даты, например 4500. Дык вот, ссссно, вопрос, как мне преобразовать, например, дату "04.12.2002" к числовому ее значению???

← →
sniknik © (2003-03-04 08:46) [1]

преобразовать так (хотя врядли он "хочет принимать", скорее ты не так пишеш)
> все варианты //кроме правильного

CDate Function Example
This example uses the CDate function to convert a string to a Date. In general, hard-coding dates and times as strings (as shown in this example) is not recommended. Use date literals and time literals, such as #2 /12 /1969# and #4:45:23 PM#, instead.

Dim MyDate, MyShortDate, MyTime, MyShortTime
MyDate = "February 12, 1969" " Define date.
MyShortDate = CDate(MyDate) " Convert to Date data type.

MyTime = "4:35:47 PM" " Define time.
MyShortTime = CDate(MyTime) " Convert to Date data type.

← →
Соловьев © (2003-03-04 09:14) [2]

Посмотри свои системные настройки, возможно у тебя первым идет месяц а потом число...
попробуй использовать DateSeparator и ShortDate

Есть методы:
function DateTimeToUnix(const AValue: TDateTime): Int64;
В секундах от January 1, 1970.
function UnixToDateTime(const AValue: Int64): TDateTime;
Обратная первой.
Юнит DateUtils.

Преобразование даты в число Найти похожие ветки