Solved Runtime error - 3073 (1 Viewer)

[Ashfaque]

Hi,

I have below code line (from full code set) that producing Runtime error - "Operations Must Use An Updatable Query

 CurrentDb.Execute "UPDATE tblLoginSessions SET LogoutEvent = Now()" & _
            " WHERE UserName=GetUserName() AND LogoutEvent Is Null AND ComputerName=GetComputerName();"

The basic idea was to clear server tbl data of the user.

Any idea please?

 

[arnelgp]

CurrentDb.Execute "UPDATE tblLoginSessions SET LogoutEvent = '" & Format(Now(), "yyyy-mm-dd hh:nn:ss") & ".000'" & _
" WHERE UserName= '" & GetUserName() & "' AND LogoutEvent Is Null AND ComputerName='" & GetComputerName() & "';" dbSeeChanges

Or, if LogoutEvent is Date type:

CurrentDb.Execute "UPDATE tblLoginSessions SET LogoutEvent = Now() " & _
" WHERE UserName= '" & GetUserName() & "' AND LogoutEvent Is Null AND ComputerName='" & GetComputerName() & "';", dbSeeChanges

 

[Minty]

I think you would need to concatenate the functions results into that string.

Create a strSQL to assist you with debugging.

I can't seem to post the code due to a forum error!

 

[Ashfaque]

Thanks Gentlemen,

I added PK to the table and it worked.

Thanks for your support..

Regards,