Своял следующее:

dim cnn as new adodb.connection
dim rst as new adodb.recordset
dim strSQL as string
strSQL="SELECT mytable.* from mytable where (((mytable.myfield) between _ forms![myform]![myDateField1] and forms![myform]![myDateField2] ))"
set cnn=currentproject.connection
rst.open strSQL, cnn

Таблица mytable имеет поле myfield формата Даты. В полях формы myDateField1 и myDateField2 задается период дат, для подсчета количества записей, соответствующих этому периоду.

Выскакивает ошибка на строке rst.open... о нехватке какого-то параметра...?
Вставляю строку SQL в запрос - все работает (но в запросе), а для такой операции не охота лишний запрос создавать. Может как-то проще можно подсчитать количество записей заданного периода дат...?

ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО...!!!

RVI:

Написал по-твоему...

ниже добавил цикл:
rst.movefirst
do until rst.eof
debug.print rst.recordcount
rst.movenext
loop
debug.print rst.recordcount

По всем записям выдает "-1", а debug, находящийся за циклом- вообще результат не печатает...?

фак почитал, формат изменил под американский, а "-1" так и осталась для каждой записи- по каким это может быть причинам ?

public function x()
dim cnn as new adodb.connection
dim rst as new adodb.recordset
dim strSQL as string
strSQL=""SELECT * FROM Заказы WHERE ДатаРазмещения " _
& "> #" & Forms!Заказы!ДатаРазмещения & "#;"
set cnn=currentproject.connection
rst.open strSQL, cnn
rst.movefirst
do until rst.eof
debug.print rst.recordcount
rst.movenext
loop
debug.print rst.recordcount
end function

Да нет ! В свою прогу я ЧУТЬ-ЧУТЬ по другому написал, а здесь-ради примера... Просто Комп с Интернетом и комп, где пишу прогу- разные компьютеры и не в сети, поэтому я набил примерно ручками, чтобы с флоппиками не бегать...

ВСЕ РАБОТАЕТ, ОГРОМНОЕ СПАСИБО !!!

Format(Forms!Заказы!ДатаРазмещения,"mm/dd/yyyy")

на эту строку программа ругается как на ошибку...

И СНОВА РАБОТАЕТ (правда ругалась на N, но удалил-перестала...)