Konverter "Husk mig" til "Auto login"

Hejsa Ng.

Er der nogle her der kan hjælpe med mig at lave min "Husk mig" funktion om til "Auto Login". Har ikke selv lavet hele koden, så derfor ved jeg ikke lige hvordan jeg skal gøre det.

Her kommer login ind koden:
If Request.ServerVariables("REQUEST_METHOD") = "POST" THEN
  fhuskmig = Request.Form("huskmig")
  if fhuskmig <> "" then
    Response.Cookies("login")("huskmig") = "yes"
  else
    Response.Cookies("login")("huskmig") = "no"
  end if
  Response.Cookies("login").Expires = date() + 365
' Logon
  Set Conn = Server.CreateObject("ADODB.Connection")
  Conn.Open Application("Provider")

  Sql = "SELECT user, id, lastlogon, email, navn, adresse, bypost, tlf, citat, avatar, tekst FROM users WHERE user = '"& CleanText(Request.Form("username")) &"' AND password = '"& CleanText(Request.Form("password")) &"'"
  Set Rs = Server.CreateObject("ADODB.RecordSet")
  Rs.Open Sql, Conn, 1,1

  If Rs.RecordCount = 1 THEN
    if fhuskmig <> "" then
      Response.Cookies("login")("brugernavn") = Request.Form("username")
      Response.Cookies("login")("password") = Request.Form("password")
      Response.Cookies("login").Expires = date() + 365
    end if

    Session("login") = True
    Session("user") = Rs("User")
    Session("id") = Rs("id")
    Session("lastlogon") = Rs("lastlogon")
    session("email") = Rs("email")
    Session("navn") = Rs("navn")
    Session("adresse") = Rs("adresse")
    Session("bypost") = Rs("bypost")
    Session("tlf") = Rs("tlf")
    Session("citat") = Rs("citat")
    Session("avatar") = Rs("avatar")
    Session("tekst") = Rs("tekst")
    Sql = "UPDATE users SET lastlogon = #"& Date() &"# WHERE id = " & Rs("id")
    Conn.Execute(Sql)
    Rs.Close
    Response.redirect(Request.ServerVariables("HTTP_REFERER"))
  End If



Her kommer formen på min forside:
        If Session("login") = False THEN
        huskmig = Request.Cookies("login")("huskmig")
        if huskmig = "yes" then
          Username = Request.Cookies("login")("brugernavn")
          Password = Request.Cookies("login")("password")
        end if
        %>
        <form method="post" action="/opret.asp">Bruger <input class="form_login" size="17" name="username" value="<%=Username%>">&nbsp;&nbsp;&nbsp;Password <input class="form_login" size="17" type="password" name="password" value="<%=Password%>">&nbsp;&nbsp;&nbsp;<input  type="submit" value="Login" name="Action" class="formsknap_login">&nbsp;&nbsp;&nbsp;<input class="checkbox" type="checkbox" name="huskmig"> Husk mig&nbsp;&nbsp;&nbsp;<a class='login_link' href="/opret.asp" title="Opret ny bruger">Opret bruger?</a>&nbsp;&nbsp;&nbsp;<a class='login_link' href="/passrecover.asp" title="F&aring; tilsendt dit password">Glemt password</a></form>
        <%