参数不足

宝劍藏龙口　发表于：2015-04-07 16:30:50 　

建了一个查询

UPDATE Coefficient INNER JOIN (FINNER JOIN ZYF ON (F.YMD=ZYF.YMD) AND (F.FPID=ZYF.FPID)) ON (Coefficient.StationName=F.StationName) AND (Coefficient.Month=Month(F.YMD)) SET F.FTN = Coefficient.C3+ZYF.FTN*Coefficient.C4, F.FTX = Coefficient.C1+ZYF.FTX*Coefficient.C2

WHERE F.YMD=Format(Forms!FWindow!DTPicker2,"yyyy-mm-dd hh:00:00");

用来更新表F中的数据，在窗体FWindow上加了一个日期时间控件DTPicker2,，但是执行查询时提示参数不足，期待是1，求指点，以下是代码

Dim Q As DAO.QueryDef
Set Q = CurrentDb.QueryDefs("UpdateF")

。。。
'Q.Parameters(0).Value = ToDay //加上这一句是没错的，也能执行，但我想让参数绑定到DTPicker2
Q.Execute

Top

金宇发表于：2015-05-17 21:13:34

建议你可以不用建查询，直接在窗体某个按钮的点击事件中使用vba代码进行更新或者直接在日期时间控件的更新后事件中更新

strSQL="更新sql语句"

currentdb.execute strSQL

或者修改你的查询，改成如下：

WHERE F.YMD=[输入日期];

Q.Parameters(0).Value = ToDay 改成如下

Q.Parameters(0).Value = Format(Forms!FWindow!DTPicker2,"yyyy-mm-dd hh:nn:ss")

Top

总记录：1篇页次：1/1 9 1 :

Access交流中心

参数不足