B tardes. Tengo problema en visual basic 6, consulta en rango de 2 fechas,

Tengo problema en visual basic 6, consulta en rango de 2 fechas de diferente mes ejm:

finicial = DTPicker1.Value ' 25/08/2013

ffinal = DTPicker2.Value ' 03/09/2013

rsConsulta.Open "SELECT * FROM ventas WHERE fecha BETWEEN #" & Format(finicial, "dd/mm/yyyy") & "# and #" & Format(ffinal, "dd/mm/yyyy") & "#", con, adOpenDynamic, adLockBatchOptimistic

solo me encuentra los registros del día 25 y no los siguientes.he probado cambiando el format a "mm/dd/yyyy" pero igual.

en mi base de datos los valores tienen el formato dd/mm/yyyy. Y tengo registros de fecha:

25/08/2013

28/08/2013

03/09/2013...etc

espero su apoyo

Atentamente . MArco