Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Pessoal,guardo na minha tabela data e hora no formato "dd/mm/aaaa hh:mm:ss".Preciso pesquisar na tabela registro que fiquem entre data inicial + hora inicial e data final + hora final.Estou usando o componente DTPicker para setar as datas de inicio e fim e text para setar as horas de inicio e fim.Não sei como montar essa string.Alguém saberia como resolver ?**********************Código**********************Private Sub cmdConfirma_Click()Dim dtIni, dtFim As String dtIni = dtpIni.Value dtFim = dtpFim.Value If txtHoraIni.Text = "" Then dtIni = dtIni & " " & "00:00:00" Else dtIni = dtIni & " " & txtHoraIni.Text & ":00" End If If txtHoraFim.Text = "" Then dtFim = dtFim & " " & "00:00:00" Else dtFim = dtFim & " " & txtHoraFim.Text & ":00" End If Sql = "Select * From movimento " Sql = Sql & "Where caixa = " & vId_Usuario Sql = Sql & " and data_mvt Between '" & dtIni & "' and '" & dtFim & "'" rstMovimento.Open Sql, cnn, adOpenKeyset, adLockOptimistic If rstMovimento.EOF Then MsgBox "Não há movimento para esse período !", vbOKOnly, "Atençao !" End If rstMovimento.CloseEnd Sub
Carregando comentários...