Access - error en expresion

 
Vista:
sin imagen de perfil

error en expresion

Publicado por manolo (4 intervenciones) el 08/11/2013 19:08:44
me da el siguiente error.

Error de sintaxis falta (operador) en la expresion de consulta 'ID >= no hay ningun registro activo .'.

creo que esta localizado aqui:

1
2
3
4
5
6
7
8
Private Sub lstPractice1Start_Change()
    'MsgBox (lstPractice1Start.Value)
    Dim ID As String
    ID = SelectSingleSql("ID", "tblData", "Format(TimeScan,""yyyy-mm-dd hh:nn:ss"")='" & lstPractice1Start.Value & "'")
    'MsgBox (ID)
    lstPractice1Stop.RowSource = "SELECT TimeScan FROM tblData where ID >= " & ID & ";"
    lstPractice1Stop.Requery
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Norberto
Val: 1.094
Oro
Ha mantenido su posición en Access (en relación al último mes)
Gráfica de Access

error en expresion

Publicado por Norberto (753 intervenciones) el 11/11/2013 14:20:05
Hola.

Desconozco lo que hace la función SelectSingleSql. Lo que parece claro es que el ID contiene nulo en algún momento y la expresión ...where ID >= " & ID... falla. Se supone que no debería SelectSingleSql no debería devolver un valor null, pero... Para ver si es así, pon donde está la línea 'MsgBox... la expresión Debug.Assert Not IsNull(ID). Si ID es nulo, se interrumpirá el código y tendrás que ver por qué es así.

De todas formas el error lo puedes evitar con ...where ID>= " & Nz(ID, 0) &...

Un saludo,

Nor.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar