そのため、SQL Update ステートメントで問題が発生しています。
ユーザーが次のコードを実行してログインしたときに実行しています。
Dim UpdateSQL As String
UpdateSQL = "UPDATE tblUsers SET LoginDate = GETDATE()"
UpdateSQL = UpdateSQL & " WHERE ID = '" & Session("ID") & "'"
私が思う問題は、Session("ID")
どのレコードを更新するかを明示的に呼び出したときの部分にあると思います。