Ver Mensaje Individual
  #1 (permalink)  
Antiguo 10/07/2008, 04:19
PiquioII
 
Fecha de Ingreso: junio-2008
Mensajes: 15
Antigüedad: 16 años, 5 meses
Puntos: 0
Consulta en access para un calculo

Hola, esta es mi duda:

Estoy calculando las horas que hay en una obra entre 2 fechas, lo que pasa es que me esta dando error el la clausula from.

Este es el codigo que he escrito:

Private Sub cmdejecutar_Click()
Dim dbs As Database
Dim rst As DAO.Recordset

Dim servicio As String
Dim fecha1 As Date
Dim fecha2 As Date


DoCmd.GoToRecord , , acNext
DoCmd.GoToRecord , , acPrevious

servicio = Me.Cuadro_combinado14.Value
fecha1 = Me.Fecha_Inicio.Value
fecha2 = Me.Fecha_Final.Value

Set dbs = CurrentDb()
Set rst = dbs.OpenRecordset("select sum ([personal-obra].horas) as tot from obras inner join personal-obra on obras.idobra=[personal-obra].obra where obras.nombre like '" & servicio & "' and [personal-obra].fecha between #" & [fecha1] & " # and # " & [fecha2] & "#"")

Me.Total_Hora_Normal.Text = rst.Fields(0)

rst.Clone
rst.Close

End Sub

Muchas gracias