访问 VBA 参数化查询：查询子句中的语法错误不完整

问题描述

 recup = "SELECT id_categorie FROM T_Categorie WHERE T_Categorie.libelle = " & TxtCategId.Value

''retrieve the number of the category which corresponds to the depot

    Set dbcaisse = CurrentDb
    Set rsT = dbcaisse.OpenRecordset(recup,dbOpenDynaset)
    categorie = rsT!id_categorie
      
    ''registration of the deposit
 
 Set dbcaisse = CurrentDb
 Set rsT = dbcaisse.OpenRecordset("T_Mouvement",dbOpenDynaset)

当执行到达 Set rsT = dbcaisse.OpenRecordset(recup) 级别时，我出现此错误

感谢您的回答

解决方法

但是当我执行 debug.print recup 时，我的请求带有我的值，我有这个 SELECT id_categorie FROM T_Categorie WHERE T_Categorie.libelle = Wester union

,

不知道你的秘密值，如果存在它可能是文本，因此必须引用：

 recup = "SELECT id_categorie FROM T_Categorie WHERE T_Categorie.libelle = '" & TxtCategId.Value & "'"