Работа с Датами и базой данных.

[Shurik90]

У меня не получается сравнить две даты одна из которых находится в базе данных, а вторая в текстбоксе.

Что мне надо ? Есть текстбокс, в нём записанна дата. Теперь из базы данных мне надо выбрать все рекорды, где один из параметров больше той даты, что в текстбоксе.

Пробовал так:

Код: Выделить всё

                   
rstOffers.Open "select * from tblOffers where ValidUntil < Format(txtAllSearch.Text, ""short date"")", Cnn, adOpenStatic, adLockOptimistic



И так:

Код: Выделить всё

rstOffers.Open "select * from tblOffers where ValidUntil < " & txtAllSearch.Text & "", Cnn, adOpenStatic, adLockOptimistic


Сам ValidUntil определён в базе данных как "short date"

И всё ни в какую.

Кто знает как надо ? Помогииииите, пожалуйста !

[A.A.Z.]

А так:

Код: Выделить всё

rstOffers.Open "select * from tblOffers where ValidUntil < " & Format(txtAllSearch.Text, "short date") & ", Cnn, adOpenStatic, adLockOptimistic "


[Shurik90]

Спасибо, A.A.Z., но это тоже было не оно.

Сидел всю ночь и наконец я его вычислил: Нужны решётки (#) для обозначения даты, причём в самом неожиданном месте

Код: Выделить всё

rstOffers.Open "select * from tblOffers where ValidUntil < #" & txtAllSearch.Text & "#", Cnn, adOpenStatic, adLockOptimistic