Sumar registros de una BD

[Rriveros]

Hola, tengo una bd que tiene unos campos que se llaman duración y costo, los cuales al listar la bd me gustaria que se sumaran todos los registros de duración y hiciera un total, lo mismo me gustaria con el costo, como lo puedo hacer??



Salu2

[Mickel]

Select sum(duracion),sum(costo) from bd

[Rriveros]

Hola Mickel, esto es lo que listo y abajo me gustaría que aparecieran los totales, no entiendo como encajar tu select.

<%
Dim oConn,strSQL, objRS, sColor

Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("tarifario.mdb"))

strSQL = "SELECT * FROM Ingreso_llamados order by Nro_llamado, Fecha, Llamador "
Set objRS = oConn.Execute(strSQL)


%>
<P>Fecha Actual <%=Date%> </P>
<TABLE BORDER=1 CELLSPACING=1 CELLPADDING=1>
<TR><td bgcolor=#cccccc>FECHA<TD bgcolor=#cccccc>NUMERO LLAMADO </TD><TD bgcolor=#cccccc>HORA </TD><TD bgcolor=#cccccc> ANEXO </TD><TD bgcolor=#cccccc> LLAMADO SOLICITADO POR </TD><TD bgcolor=#cccccc> OBSERVACIONES </TD><TD bgcolor=#cccccc> DURACION </TD><TD bgcolor=#cccccc> COSTO </TD><TD bgcolor=#cccccc> OTROS </TD><TD bgcolor="#FF0000"><font color="#FFFFFF">Borrar</font></TD></TR>
<%


while (not objRS.Eof)
Response.Write("<tr><td>&nbsp;" & objRS("Fecha")& "&nbsp;</td><td>&nbsp;" & objRS("Nro_llamado") & "</td><td>&nbsp;" & objRS("Hora") & "&nbsp;</td><td>&nbsp;" & objRS("Anexo") & "&nbsp;</td><td>&nbsp;" & objRS("Llamador") & "&nbsp;</td><td>&nbsp;" & objRS("Observaciones") & "&nbsp;</td><td>&nbsp;" & objRS("Duracion") & "&nbsp;</td><td>&nbsp;" & objRS("Costo") & "&nbsp;</td><td>&nbsp;" & objRS("Otros") & "&nbsp;</td><td><a href=""borra_llamados.asp?id=" & objRS("id") & """>Borrar</a></td></tr>")
objRS.MoveNext
wend

oConn.Close
set objRS = nothing
set oConn = nothing

%>
</TABLE>

[Mickel]

entre el wend y el oconn.close...

<%
strSQL = "SELECT sum(duracion),sum(costo) FROM Ingreso_llamados"
Set objRS = oConn.Execute(strSQL)
Response.Write "<tr><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td> " & objRS(0) & " </td><td> " & objRS(1) & " </td><td>&nbsp;</td><td>&nbsp;</td></tr>"