POR FIN.....
la solucion aqui:......
rst.Source = " SELECT * FROM CLIENTES WHERE FECHA_HORA BETWEEN cDate('" & fecha1 & "') AND cDate('" & fecha2 & "') and ALERTA_DESCONOCE_CONTRATO = 'SI'"
utilizando comillas simples y dobles...
muchas muchas muchas gracias por la pasiencia y por alayuda entragada pablo y rafapas