tidsforskel problem

Hej E.

Jeg er ved at lave en slags kontrol funktion som husker folk på at gå en rundering men det vil ikke rigtigt virke:

runderingskontrol.asp
****************************

<!--#include file="security.asp"-->
<%
Response.Expires = -1000 'Makes the browser not cache this page
Response.Buffer = True 'Buffers the content so our Response.Redirect will work

Session.Timeout=90
%>
<script type="text/javascript">
window.onload = function() { setTimeout("window.location='runderingskontrol.asp'", 20000) }
</script>
<!--#include file="forbindelse.asp"-->
<%
'-------------------------------------------------------------------------------------------------------
If Request.Querystring("cmd") = "" Then

intKontroltid = session("kontroltid")
response.write intKontroltid
response.write "<br>"
response.write Now()

tidsforskel = datediff("m",now(),intKontroltid)
if tidsforskel>7 then

strSQL = "SELECT * FROM bruger_kontrol"
    objRec.Open strSQL, objConn, 1, 3
    objRec.Addnew
    objRec("brugerid")    = Session("nummer")
    objRec("bruger")    = Session("fuldenavn")
    objRec("oprettet")    = Now()
    objRec("status")    = "Kontrol påbegyndt"
    objRec.update
    objRec.Close
   
'Find sidste tilføjet ID
    strSQL = "SELECT @@IDENTITY FROM bruger_kontrol"
    objRec.Open strSQL, objConn, 1, 3
    nytID = objRec(0)
    objRec.Close
%>
<SCRIPT LANGUAGE="VBscript">
  Value = MsgBox ("Du skal foretage en rundering!",32+4,"RUNDERINGSKONTROL!")
  If Value=6 Then
      window.location="runderingskontrol.asp?cmd=opdater&id=<%= nytID %>&status=Afsluttet"
  Else
      window.location="runderingskontrol.asp?cmd=opdater&id=<%= nytID %>&status=Afvist"
  End If
</SCRIPT>
<%
else
response.write "<br>Alt ok"
end if

'-------------------------------------------------------------------------------------------------------
elseif Request.Querystring("cmd") = "opdater" Then

    strSQL = "SELECT * FROM bruger_kontrol WHERE id = "& Request.Querystring("id") &""
    objRec.Open strSQL, objConn, 1, 3

    intRundetid = objRec("oprettet")

    tidsforskel = datediff("m",now(),intRundetid)
    if tidsforskel<2 then
   
    strStatus = "KONTROL: Forsent | VALG:"& Request.Querystring("status")
    objRec("afsluttet")    = Now()
    objRec("Status")    = strStatus
    objRec.update
    objRec.Close
    session("kontroltid") = Now()
%>
<SCRIPT language=VBScript>
    <!--
    alert("Det var for sent!!!")
    -->
</SCRIPT>

<%
    'response.redirect "runderingskontrol.asp"
    else
   
    strStatus = "KONTROL: OK | VALG: "& Request.Querystring("status")
    objRec("afsluttet")    = Now()
    objRec("Status")    = strStatus
    objRec.update
    objRec.Close
    session("kontroltid") = Now()
%>
<SCRIPT language=VBScript>
    <!--
    alert("God arbejdet...")
    -->
</SCRIPT>
<%
    'response.redirect "runderingskontrol.asp"
    end if
%>

<% End If %>
<!--#include file="forbindelse_luk.asp"-->