Pessoal tenho um problema...

Pessoal tenho um problema ...

dtIni = Int(dtpIni.Value) & " " & dtpHoraIni dtFim = Int(dtpFim.Value) & " " & dtpHoraFim (onde dtIni = 08/02/2007 13:00:00) ( dtFim = 31/01/2007 23:59:59) Sql = Sql & "Where caixa = " & vId_Usuario Sql = Sql & " and data_mvt Between #" & Format(dtIni, "yyyy/mm/dd hh:mm:ss") & "# and #" & Format(dtFim, "yyyy/mm/dd hh:mm:ss") & "#" Sql = Sql & " order by operacao, data_mvt" rstMovimento.Open Sql, cnn, adOpenKeyset, adLockOptimistic If dtIni > dtFim Then Exit Sub End If

Essa crítica não funciona ... print dtini > dtfim, retorna false !! Alguem sabe como resolver ???ObrigadoFauze