2013-07-08 60 views
1

我想运行一个简单的更新查询应该从窗体中获取值并更新已经存在的表。这是使用VBA完成的。显示执行时没有错误信息,但表格未用来自NI的新值更新。代码如下。更新查询不更新表中的值使用访问

strsql = "UPDATE t_datefromform SET " 
    strsql = strsql & "[txtmonth] = '" & [Forms]![SupplierScorecard].[txtMonth] & "'" 

    Debug.Print strsql 

    CurrentDb.Execute strsql 
+3

请告诉我们Debug.Print的输出! – dwo

+2

向我们展示了Debug.Print的输出后,请告诉我们,如果相同的SQL字符串在VBA之外运行良好 - 换句话说,作为从查询设计接口“手动”运行的查询对象的基础。 – Smandoli

+0

Debug.Print语句的输出是UPDATE t_datefromform SET [txtmonth] ='Oct-2012' – user1403848

回答

0

设置[txtmonth]是输入参数 使用 STRSQL = “更新t_datefromform设置txtmonth = '” & [窗体]![SupplierScorecard] [txtMonth] & “'”