Hola, a ver si me podeis ayudar:
Tengo una bbdd en Access con 2 tablas (Obras y Personal), lo que quiero es que me sume las horas de un servicio entre 2 fechas (el servicio y las fechas las recojo de unos textbox) y esa suma añadirla a un textbox y lo estoy haciendo de esta manera pero me da un error el visual basic:
Dim dbs As Database, qdf As QueryDef, sql As String
Dim servicio As String
Dim fecha1 As Date
Dim fecha2 As Date
Dim condicion As String
Dim total As Integer
Me.Cuadro_combinado14.SetFocus
servicio = Me.Cuadro_combinado14.Text
Me.Fecha_Inicio.SetFocus
fecha1 = Me.Fecha_Inicio.Text
Me.Fecha_Final.SetFocus
fecha2 = Me.Fecha_Final.Text
Set dbs = CurrentDb
sql = "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] & "#"
Set qdf = dbs.CreateQueryDef("SecondQuarter", sql)
Me dice que hay un error '3131' . Error de sintaxis en la clausula FROM.
Espero me ayudeis.
Muchas gracias.