ник: kot_k_k
"select * from Zakaz where data_zak=" & me.Дата_Заказа & " and " & me.Нач_Заказа & "between time_nach and Time_end"
и проверка на EOF, возможно вместо between использовать конструкцию me.Нач_Заказа<= time_nach and me.Нач_Заказа <=Time_end