А с каких щей он будет работать

SELECT PRODUCTS_TBL.*, FormatSpDate([PRODUCTS_TBL]![DATE_OTK]) AS Выражение1
FROM PRODUCTS_TBL
WHERE (((FormatSpDate([PRODUCTS_TBL]![DATE_OTK]))>=FUN_DATE_FIRST() And (FormatSpDate([PRODUCTS_TBL]![DATE_OTK]))<=FUN_DATE_LAST()))
ORDER BY PRODUCTS_TBL.ORDER_NUMBER
WITH OWNERACCESS OPTION;


смотрим функцию
Public Function FormatSpDate(ByVal parDate As Date, Optional bSQL As Boolean = False) As String
FormatSpDate = Format$(parDate, "\#mm\/dd\/yy\#")
End Function

смотрим другие функции

Public Function FUN_DATE_FIRST() As Date
' вспомогательная функция для получ даты начала отчёта
On Error GoTo neht
If GLB_DATE_FIRST = "00:00:00" Then GLB_DATE_FIRST = Date
FUN_DATE_FIRST = GLB_DATE_FIRST
Exit Function
neht:
FUN_DATE_FIRST = Date

End Function
Public Function FUN_DATE_LAST() As Date
' вспомогательная функция для получ даты начала отчёта
On Error GoTo neht
If GLB_DATE_LAST = "00:00:00" Then GLB_DATE_LAST = Date
FUN_DATE_LAST = GLB_DATE_LAST

Exit Function
neht:
FUN_DATE_LAST = Date

End Function

более того в обоих функциях
GLB_DATE_FIRST = Date
GLB_DATE_LAST = Date

а чему равно date в формате 02/28/2012 15:12:36

а чему равно date в формате 02/28/2012 15:12:36
===========================================
Там функция приводящая фсё к единому формату.

Public Function FormatSpDate(ByVal parDate As Date, Optional bSQL As Boolean = False) As String
FormatSpDate = Format$(parDate, "\#mm\/dd\/yy\#")
End Function

2 snipe ого я до этова и не дошол

GLB_DATE_LAST = Nz(Me!DATE_PROCESS1)

далее в функции преобразуется в текущую дату

Public Function FUN_DATE_FIRST() As Date

On Error GoTo neht
If Nz(GLB_DATE_FIRST) = "" Then GLB_DATE_FIRST = Date
If GLB_DATE_FIRST = "00:00:00" Then GLB_DATE_FIRST = Date
FUN_DATE_FIRST = GLB_DATE_FIRST
Exit Function
neht:
FUN_DATE_FIRST = Date

End Function

Час какой блин единый формат
функция FormatSpDate выдает String (текст)
а другие функции as Date

Спасибо снайпер!!!!
Вот он выход к единому формату!
Format([DATE_OTK],"mm/dd/yyyy")