Проблема с полем даты.

A.Klimenko
Дата: 28.09.2005 12:36:57
Пишу
Public Function FormatSpDate(ByVal parDate As Date, Optional bSQL As Boolean = False) As String
If bSQL Then
FormatSpDate = Format$(parDate, "'yyyymmdd'")
Else
FormatSpDate = Format$(parDate, "\#mm\/dd\/yy\#")
End If
End Function
Затем прбую применить в MDB:
If Me![vk_d_nakl_open] And Me![pol_d_nakl_open] <> "" Then
strSQLWhere = strSQLWhere & "([_czh_schet_sh].[d_nakl] > " & FormatSpDate(Me![pol_d_nakl_open]) & ") AND "
End If
Работает нормально.
Пробую перенести это в ADP
Выдает ошибку (недопустимая инструкция SQL)
Может кто подскажет что делать?
adv
Дата: 28.09.2005 12:48:34
FormatSpDate(Me![pol_d_nakl_open], True)
RVB
Дата: 28.09.2005 12:50:56
A.Klimenko
Пишу
strSQLWhere = strSQLWhere & "([_czh_schet_sh].[d_nakl] > " & FormatSpDate(Me![pol_d_nakl_open]) & ") AND "
Может кто подскажет что делать?

Мне кажется, что & ") AND " не там стоит
A.Klimenko
Дата: 28.09.2005 12:52:05
Большое спасибо.