Fazer media de Datediff!

[MAPSantos 0]

Oi Comunidade,

 

Tou usando o seguinte código para retornar datediff de determinados valores.

 

<%If Request.querystring("mode") = "exclbo" thenSet rsCheckListexclbo = Server.CreateObject("ADODB.Recordset")strSQLListexclbo = "SELECT * FROM TABELA WHERE data_follow_up > #"& datadefeito &"# and id > "& firstid &" ORDER BY ultima_act"rsCheckListexclbo.Open strSQLListexclbo, adoCon2%>					</p>							<table width="97%" border="0" cellspacing="1">							  <tr>								<td class="style6"><div align="center"></div></td>								<td class="style6"><div align="center">Tempos</div>									<div align="center"></div></td>								<td colspan="9" class="style6"><div align="center">Datas</div></td>							  </tr>							  <tr>								<td rowspan="2" class="style6"><div align="center">ID</div></td>								<td rowspan="2" class="style6"><div align="center">									<div align="center">Exclusivo BO </div>								</div></td>							  </tr>							  <tr>								<td class="style6"><div align="center">Inicio</div></td>								<td class="style6"><div align="center">Data Estado Sigma</div></td>								<td class="style6"><div align="center">Resp. PT</div></td>								<td class="style6"><div align="center">Follow Up</div></td>							  </tr>							  <%Do While NOT rsCheckListexclbo.EOF%>							  <tr>								<td bgcolor="#FFFFFF" class="style8"><div align="center">									<%Response.Write ("<a href=cladslsearch.asp?mode=view&id=")					Response.Write (rsCheckListexclbo("id"))					Response.Write (">")					Response.Write (rsCheckListexclbo("id"))					Response.Write ("</a>")	%>								</div></td>								<td bgcolor="#FFFFFF" class="style8"><div align="center">									<%response.Write (DateDiff("n",rsCheckListexclbo("data_inicio_processo"),rsCheckListexclbo("data_estado_sigma")))+(DateDiff("n",rsCheckListexclbo("respptfinal_data"),rsCheckListexclbo("data_follow_up")))%>									mn (<%response.Write (DateDiff("h",rsCheckListexclbo("data_inicio_processo"),rsCheckListexclbo("data_estado_sigma")))+(DateDiff("h",rsCheckListexclbo("respptfinal_data"),rsCheckListexclbo("data_follow_up")))%>								h)</div></td>								<td bgcolor="#FFFFFF" class="style8">								  <div align="center">									<%response.Write rsCheckListexclbo("data_inicio")%>									<br>								  </div></td>								<td bgcolor="#FFFFFF" class="style8"><div align="center">								  <%response.Write rsCheckListexclbo("data_estado_sigma")%>								</div></td>								<td bgcolor="#FFFFFF" class="style8"><div align="center">								  <%response.Write rsCheckListexclbo("respfinal_data")%>								</div></td>								<td bgcolor="#FFFFFF" class="style8"><div align="center">								  <%response.Write rsCheckListexclbo("data_follow_up")%>								</div></td>								<%rsCheckListexclbo.movenextLooprsCheckListexclbo.CloseSet rsCheckListexclbo = Nothing%>					</table>

ta' funcionando tudo ok ... a minha pergunta e' .. se ha' forma de no final do retorno ele somar todos os

<%response.Write (DateDiff("n",rsCheckListexclbo("data_inicio_processo"),rsCheckListexclbo("data_estado_sigma")))+(DateDiff("n",rsCheckListexclbo("respptfinal_data"),rsCheckListexclbo("data_follow_up")))%>									mn (<%response.Write

um abraço

[MAPSantos 0]

Ja' arranjei forma de ir somando os valores ... fiz de forma a que ele somasse no loop as respostas ;)

 

total = (DateDiff("n",rsCheckListexclbo("data_inicio_processo"),rsCheckListexclbo("data_estado_sigma")))+(DateDiff("n",rsCheckListexclbo("respptfinal_data"),rsCheckListexclbo("data_follow_up"))) + total

algo assim :D