BOm Dia
uso o Sql Server 2008 r2 e estou com um problema
eu faço a pesquisa ao banco usando os seguintes scripts
PESQUISA NOS ULTIMOS 60 MINUTOS
Table = xc_cronometro.Fonte_Timer.Item(“Hist_HD”).TableName
Set Consulta = xc_Cronometro.Item("Consulta1")
Consulta.SQL = "Select SUM(HorasD)as somaHoras60 FROM " &Table& _
" WHERE E3TimeStamp >= #<%DataInicial%># AND E3TimeStamp <= #<%DataFinal%># "
Consulta.SetVariableValue “DataInicial”, now-1/24
Consulta.SetVariableValue “DataFinal”, Now
Set rec = Consulta.GetADORecordset()
If IsNull(rec.Fields.Item("somaHoras60").Value) then
Value = "0:00:00"
else
Value = cdate(rec.Fields.Item("somaHoras60").Value)
Format = "HH:mm:ss"
end if
PESQUISA NO ULTIMAS 24 HORAS
Table = xc_cronometro.Fonte_Timer.Item("Hist_HD").TableName
Set Consulta = xc_Cronometro.Item("Consulta1")
Consulta.SQL = "Select SUM(HorasD)as somaHoras24 FROM " &Table& _
" WHERE E3TimeStamp >= #<%DataInicial%># AND E3TimeStamp <= #<%DataFinal%># "
Consulta.SetVariableValue “DataInicial”, now-1
Consulta.SetVariableValue “DataFinal”, Now
Set rec = Consulta.GetADORecordset()
If IsNull(rec.Fields.Item("somaHoras24").Value) then
Value = "0:00:00"
else
Value = Cdate(rec.Fields.Item("somaHoras24").Value)
Format = "HH:mm:ss"
end if
PESQUISA NOS ULTIMOS 7 DIAS
Table = xc_cronometro.Fonte_Timer.Item("Hist_HD").TableName
Set Consulta = xc_Cronometro.Item("Consulta1")
Consulta.SQL = "Select SUM(HorasD)as somaHoras7 FROM " &Table& _
" WHERE E3TimeStamp >= #<%DataInicial%># AND E3TimeStamp <= #<%DataFinal%># "
Consulta.SetVariableValue “DataInicial”, now-7
Consulta.SetVariableValue “DataFinal”, Now
Set rec = Consulta.GetADORecordset()
If IsNull(rec.Fields.Item("somaHoras7").Value) then
Value = "0:00:00"
else
Value = Cdate(rec.Fields.Item("somaHoras7").Value)
Format = "HH:mm:ss"
end if
PESQUISA NOS ULTIMOS 30 DIAS
Table = xc_cronometro.Fonte_Timer.Item("Hist_HD").TableName
Set Consulta = xc_Cronometro.Item("Consulta1")
Consulta.SQL = "Select SUM(HorasD)as somaHoras30 FROM " &Table& _
" WHERE E3TimeStamp >= #<%DataInicial%># AND E3TimeStamp <= #<%DataFinal%># "
Consulta.SetVariableValue “DataInicial”, now-30
Consulta.SetVariableValue “DataFinal”, Now
Set rec = Consulta.GetADORecordset()
If IsNull(rec.Fields.Item("somaHoras30").Value) then
Value = "0:00:00"
else
Value = Cdate(rec.Fields.Item("somaHoras30").Value)
Format = "HH:mm:ss"
end if
esta acontecendo o seguinte:
a pesquisa dos ultimos 7 dias e 30 dias estão me entregando um valor irreal, conforme imagem abaixo, pode- se verificar que nas ultimas 24 horas a bomba já rodou 20 horas e nos 7 e 30 dias me mostra um valor abaixo disso o que pode estar errado?
