I'm trying to track the users that access a page in my application and I 
am using two subroutines for that. However update in the first subroutine 
will not execute. Could anyone please help me? Here is the code: 

<SCRIPT LANGUAGE=vbscript>
Sub Window_OnLoad()
<% 
If rsItem("lastretriever")=" " OR rsItem("lastretriever")="NULL" then%>
MsgBox("The record is not in use. Are you sure that you want to process?")
<%
rsItem("lastretriever")= Session("FirstName")&" "&Session("LastName")
rsItem.Update
Else%>
MsgBox"Record is in use"
<% End If
%>
End Sub
</script>
 <SCRIPT LANGUAGE=vbscript>
Sub Window_OnUnLoad()
<%
rsItem("lastretriever")= " "
rsItem.Update
%>
End Sub
</script>