12/07/2006, 22:06
|
 | | | Fecha de Ingreso: abril-2004 Ubicación: 62º 06' 18" O / 33º 07' 47" S
Mensajes: 331
Antigüedad: 20 años, 1 mes Puntos: 1 | |
En una unica consulta:
Código:
rs.Open "SELECT sum(debe) as total_debe, sum(haber) as total_haber, (sum(debe) - sum(haber)) as saldo FROM pagos"
lblDebe.Caption = IIf(IsNull(rs.Fields("total_debe").Value), 0, rs.Fields("total_debe").Value)
lblHaber.Caption = IIf(IsNull(rs.Fields("total_haber").Value), 0, rs.Fields("total_haber").Value)
lblSaldo.Caption = IIf(IsNull(rs.Fields("saldo").Value), 0, rs.Fields("saldo").Value)
Un saludo
__________________
Marcos
El dinero no da la felicidad... démelo y sea feliz!!! |