rivernike1
01 de Septiembre del 2005

hola
rengo un codigo para sumar el total de egresos en access, pero necesito que solamente sumes los egresos del mes saliente.
NOTA: para consultar si tuve perdidas o ganacias.

tengo el codigo asi pero cuando la ejecuta me pide el date, el problema es que necesito colocar este codigo en visual basic y lo hize colocando un text donde me captura la fecha del sistema pero cuando oprimo el boton para que me traiga la consulta no lo hace.

el codigo es asi:
este me trae la fecha del sistema
Private Sub text1_GotFocus()
Text1 = Date
End Sub
este hace la consulta cuando oprimo el boton
Private Sub CmTotalEgresos_Click()
Data2.DatabaseName = App.Path & "DBGIMNASIO.mdb"
Data2.RecordSource = "SELECT Sum(total_pagar) AS [TOTAL EGRESOS] From Egresos where Month (Fecha_pago) = Month (Date)=" & (Text1.Text)
Data2.Refresh
End Sub
por favor espero respuestas estoy volviendome loco
Gracias

Isa? Islas
01 de Septiembre del 2005

Utiliza la funcion DATEADD()

rivernike1
01 de Septiembre del 2005

NO ENTIENDO LO DEL DATEADD(), ME PERDONARAS PERO NUNCA LA HE ESCUCHADO, NI MUCHO MENOS IMPLEMENTADO.
ESPRO ME PUEDAS FACILITAR UN MANUAL O ALGO PARECIDO O LA INSTRUCION COMO SE IMPLETA.
GRACIAS