sql

[lokoman]

Hola!!
Verifica que lo que tienes en la variable DIA está en el campo FECHA de la BD, si está entonces pon el recordset asi:

Código vb:

Do While rs.EOF=false
   total = rs!total + total
   rs.MoveNext
   Doevents
Loop
 

Nos cuentas!!