En db der skal skrive en ny dato vær gang man logger ind

Her kommer spm så....
Hvordan laver man en udløbs dato som stiger hvær gang en bruger logger sig ind med brugernavn & password, så vis han ikke har været logget på i 2 månder bliver han auto slettet.
Jeg har en table der opdater værgang en bruger logger på, den skriver en ny dato vær gang.
<% -- Min kode -- %>

<%

strBrugernavn = Trim(Replace(request("Brugernavn"),"'","''" ))
strAdgangskode = Trim(Replace(request("Adgangskode"),"'","''" ))

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/medlemsliste/medlemmer.mdb")
Conn.Open DSN

strSQL = "SELECT * FROM [user] WHERE Brugernavn = '" & strBrugernavn & "' And Adgangskode = '" & strAdgangskode & "'"
Set rs = Conn.Execute(strSQL)

If Not rs.EOF Then
    Session("ID") = rs("ID")
    Session("Brugeradgang") = "JA"
    Session("Brugernavn") = rs("Brugernavn")
   
    SQL = "UPDATE [user] SET Dato2 = #" & Now() & "# WHERE ID = " & rs("ID")
    Conn.Execute(SQL)

    rs.Close
    Conn.Close

    Response.redirect "index2.asp"
Else
    Response.Write "Ikke fundet noget"
    ' Hvis brugeren ikke fandtes i databasen
    Response.redirect "index.asp"
End If


rs.Close
Conn.Close

%>

//Håber i kan hjælpe mig