ник: Stas
Не очень понял, что значит "руками". Даты в запрос подтаскиваются из контрола Text
Начальный код после подсказки про format выглядит так:
Dim NwBillFr As db1.Form_NEW_BILL
Dim PolPmntStr As String
PolPmntStr = "Update POLICY_PAYMENT set BILL_ID=" & BILL_ID & " where ID in " & _
"(SELECT PP.ID FROM POLICY AS P LEFT JOIN POLICY_PAYMENT AS PP ON P.ID = PP.POLICY_ID WHERE " & _
"(((PP.DATE_DUE)>format('" & NwBillFr.Text7.Value & "', '#mm/dd/yyyy#') And (PP.DATE_DUE)<format('" & NwBillFr.Text2.Value & "','#mm/dd/yyyy#') And ((P.INSURER_ID) = " & NwBillFr.Combo0.Value & ") And ((PP.BILL_ID) = 0)))"
Но теперь не работает, ругаясь на отсутствие закрывающей скобки -круглой или квадратной.
А в Вашем ответе нет опечатки? format('01.01.2007',"\#dd\/mm\/yyyy\#")