WHERE子句,在VBA,SQL后端,Access前端中具有Max(Date)功能

时间:2013-11-18 18:29:46

标签: vba access-vba

在Access中,我正在尝试使用Max(Date)功能构建一个WHERE子句,但它不起作用。任何帮助将不胜感激。

strSQL1 = "Update tTbl_LoginSessions SET fldLogoutEvent = '" & Now() & "'" & _
 " WHERE fldUserName = " & IntMSIDAutoNum And fldLoginEvent = MAX(fldLoginEvent)

fldLoginEvent是用户登录的日期/时间 fldLogoutEvenr是用户将被注销的日期/时间

1 个答案:

答案 0 :(得分:0)

最明显的修正:

strSQL1 = "Update tTbl_LoginSessions SET fldLogoutEvent = '" & _
           Now() & "'" & " WHERE fldUserName = " & IntMSIDAutoNum  & _
           " And fldLoginEvent =  (select top 1 fldLoginEvent from " & _
           " tTbl_LoginSessions )"