Problemas sentencia SQL
Hola a todos,
Tengo la siguiente sentencia SQL, la cual me funciona bien:
Private Sub Comando31_Click()
Dim bd As Database
Dim r As Recordset
Set bd = CurrentDb
Set r = bd.OpenRecordset("SELECT * FROM SALIDA WHERE CLIENTE = 1 ")
r.Edit
r.("DOCUMENTO") = "FACTURADO"
r.Update
r.Close
End Sub
Hasta aquí bien, pero cuando intento coger el valor de la condición "WHERE" de un formulario me da error: (pocos parámetros, se esperaba 1), posiblemente falta alguna expresión:
Set r = bd.OpenRecordset("SELECT * FROM SALIDA WHERE CLIENTE = forms!MENU![DESDE CLIENTE]")
Tengo la siguiente sentencia SQL, la cual me funciona bien:
Private Sub Comando31_Click()
Dim bd As Database
Dim r As Recordset
Set bd = CurrentDb
Set r = bd.OpenRecordset("SELECT * FROM SALIDA WHERE CLIENTE = 1 ")
r.Edit
r.("DOCUMENTO") = "FACTURADO"
r.Update
r.Close
End Sub
Hasta aquí bien, pero cuando intento coger el valor de la condición "WHERE" de un formulario me da error: (pocos parámetros, se esperaba 1), posiblemente falta alguna expresión:
Set r = bd.OpenRecordset("SELECT * FROM SALIDA WHERE CLIENTE = forms!MENU![DESDE CLIENTE]")
Respuesta de byleto
1