按下按钮时MS Access VBA Upsert / Insert / Update查询

Question

我在访问中有一个表单，带有一个按钮。按钮推送1 应将值(UserID,Now(),Date())插入 tbl 字段(UserID,Time_In,WorkDate)。

按钮推送2 应将值(Now())插入 tbl 字段(Time_Out)。

我能想到的最佳方法是使用insert / update语句;伪语法：

If UserID = UserID and WorkDat e= Date() THEN SET Time_Out = Now()

ELSE

Insert into tbl (UserID,WorkDate,Time_In).

尽管我读过 Access 并不能很好地处理Upserts，我有办法做到这一点吗？

我读过这个：  Upserting in MS-access

我不太明白这里建议的答案： MS Access UPSERT (Update/Insert) SQL

提前致谢，

Jof。

Answer 1

打开记录集，其中UserID = UserID和WorkDate = Date（）where condition，如果Recordcount＆gt; 0，使用Edit方法，否则使用AddNew方法并更新记录集。像这样：

declare @soq int
update table1 set val = power((0.8617*@soq),-0.2155)