Bom dia
Estou usando a seguinte script para consulta ao banco de dados
Table = xc_Display_VazaoLs_Inst.Fonte.Item("HistPulso_Minutos").TableName
Set Consulta = xc_Display_VazaoLs_Inst.Item("Consulta1")
Consulta.SQL = "Select SUM(Valor)as soma3M FROM " &Table& _
" WHERE E3TimeStamp >= #<%DataInicial%># AND E3TimeStamp <= #<%DataFinal%># "
Consulta.SetVariableValue "DataInicial", now - 3/(24*60)
Consulta.SetVariableValue "DataFinal", now
Set rec = Consulta.GetADORecordset()
If IsNull(rec.Fields.Item("soma3M").Value) then
Value = 0
else
Value = CStr(rec.Fields.Item(“soma3M”).Value /180)
format = “0,0”
end if
só que ao receber o retorno o mesmo vem sem a formatação . poderiam me ajudar a resolver isto ?