Que hago mal?
Publicado por joanignasi (21 intervenciones) el 29/03/2001 17:53:20
En un formulario tengo boton que ejecuta el siguiente codigo.Algo va mal con las fechas porque no devuelve nada:
'datafac es un campo fecha
Private Sub Comando11_Click()
On Error GoTo Err_Comando11_Click
Dim BASEDADES As Database
Dim TAULA As Recordset
Dim ESEQUELE As String
Dim TOTALES
Dim mifecha
Set BASEDADES = CurrentDb
mifecha =#01/03/01#
ESEQUELE = "SELECT SUM(QUOTA)AS TOT FROM [ facturació] WHERE datafac = " & mifecha
Set TAULA = BASEDADES.OpenRecordset(ESEQUELE)
TOTALES = TAULA!tot
'totales tiene el valor NULO y no deberia
Alguna sugerencia? Gracias
'datafac es un campo fecha
Private Sub Comando11_Click()
On Error GoTo Err_Comando11_Click
Dim BASEDADES As Database
Dim TAULA As Recordset
Dim ESEQUELE As String
Dim TOTALES
Dim mifecha
Set BASEDADES = CurrentDb
mifecha =#01/03/01#
ESEQUELE = "SELECT SUM(QUOTA)AS TOT FROM [ facturació] WHERE datafac = " & mifecha
Set TAULA = BASEDADES.OpenRecordset(ESEQUELE)
TOTALES = TAULA!tot
'totales tiene el valor NULO y no deberia
Alguna sugerencia? Gracias
Valora esta pregunta
0