Hjælp med login system fejl med execute(Update) plz hjælp

database.execute(Update) denne erstatter du med

  set rsLogin = execute(Update)

okay det vil jeg lige prøve.

hmm nu har jeg prøvet så skriver den "Slut på sætning var ventet" så hvor skal jeg lige sættet slutningen henne?

'Save the entered username and UserPassword
    UserName = Request.Form("UserName")   
    UserPass = Request.Form("PassWord")
   
    if Request.Form("UserName") = "" then Response.redirect("../Data_includes/DataInc_reg.asp")
    if Request.Form("PassWord") = "" then Response.Redirect("../Data_includes/DataInc_reg.asp")

    set rsLogin = server.CreateObject ("ADODB.Recordset")       
    rsLogin.Open "SELECT * FROM protect WHERE UserName='"& UserName &"'", database, 1
    If rsLogin.recordcount = 0 then
        rsLogin.close
        set rsLogin=nothing
        Response.Redirect("../home/register.asp?action=msg&txt=Brugernavnet findes ikke!")

else
   
    if Request.Form("PassWord") = UserPass then
        Session.Timeout = 20
        Session("Rettigheder") = rsLogin("Rettigheder")
        Session("id") = rsLogin("id")
        Session("UserName") = rsLogin("UserName")
        Session("FirstName") = rsLogin("FirstName")
        Session("LastName") = rsLogin("LastName")
        Session("Email") = rsLogin("Email")
        Update = "UPDATE USERS SET UserUpdate = '" & Now() & "' WHERE UserName='"& UserName &"'"
        set rsLogin = execute(Update)
       
        set rsLogin=nothing
        Response.Redirect("../Data_home/Data_default.asp")

    else
        rsLogin.Close
        set rsLogin=nothing
        Response.Redirect("Data_AD/inc_logging.asp?action=fejl")
    end if   
'Save the entered username and UserPassword
    UserName = Request.Form("UserName")   
    UserPass = Request.Form("PassWord")
   
    if Request.Form("UserName") = "" then Response.redirect("../Data_includes/DataInc_reg.asp")
    if Request.Form("PassWord") = "" then Response.Redirect("../Data_includes/DataInc_reg.asp")

    set rsLogin = server.CreateObject ("ADODB.Recordset")       
    rsLogin.Open "SELECT * FROM protect WHERE UserName='"& UserName &"'", database, 1
    If rsLogin.recordcount = 0 then
        rsLogin.close
        set rsLogin=nothing
        Response.Redirect("../home/register.asp?action=msg&txt=Brugernavnet findes ikke!")
    end if
   
    if Request.Form("PassWord") = UserPass then
        Session.Timeout = 20
        Session("Rettigheder") = rsLogin("Rettigheder")
        Session("id") = rsLogin("id")
        Session("UserName") = rsLogin("UserName")
        Session("FirstName") = rsLogin("FirstName")
        Session("LastName") = rsLogin("LastName")
        Session("Email") = rsLogin("Email")
        Update = "UPDATE USERS SET UserUpdate = '" & Now() & "' WHERE UserName='"& UserName &"'"
        database.execute(Update)
        rsLogin.close
        set rsLogin=nothing
        Response.Redirect("../Data_home/Data_default.asp")

    else
        rsLogin.Close
        set rsLogin=nothing
        Response.Redirect("Data_AD/inc_logging.asp?action=fejl")
    end if   
end if

hov det var da vist lidt for meget prøv denne

'Save the entered username and UserPassword
    UserName = Request.Form("UserName")   
    UserPass = Request.Form("PassWord")
   
    if Request.Form("UserName") = "" then Response.redirect("../Data_includes/DataInc_reg.asp")
    if Request.Form("PassWord") = "" then Response.Redirect("../Data_includes/DataInc_reg.asp")

    set rsLogin = server.CreateObject ("ADODB.Recordset")       
    rsLogin.Open "SELECT * FROM protect WHERE UserName='"& UserName &"'", database, 1
    If rsLogin.recordcount = 0 then
        rsLogin.close
        set rsLogin=nothing
        Response.Redirect("../home/register.asp?action=msg&txt=Brugernavnet findes ikke!")
    end if
   
    if Request.Form("PassWord") = UserPass then
        Session.Timeout = 20
        Session("Rettigheder") = rsLogin("Rettigheder")
        Session("id") = rsLogin("id")
        Session("UserName") = rsLogin("UserName")
        Session("FirstName") = rsLogin("FirstName")
        Session("LastName") = rsLogin("LastName")
        Session("Email") = rsLogin("Email")
        Update = "UPDATE USERS SET UserUpdate = '" & Now() & "' WHERE UserName='"& UserName &"'"
        database.execute(Update)
        rsLogin.close
        set rsLogin=nothing
        Response.Redirect("../Data_home/Data_default.asp")

    else
        rsLogin.Close
        set rsLogin=nothing
        Response.Redirect("Data_AD/inc_logging.asp?action=fejl")
    end if   
end if

nu går det da rigtigt godt - det var denne jeg ville sætte ind til dig

'Save the entered username and UserPassword
    UserName = Request.Form("UserName")   
    UserPass = Request.Form("PassWord")
   
    if Request.Form("UserName") = "" then Response.redirect("../Data_includes/DataInc_reg.asp")
    if Request.Form("PassWord") = "" then Response.Redirect("../Data_includes/DataInc_reg.asp")

    set rsLogin = server.CreateObject ("ADODB.Recordset")       
    rsLogin.Open "SELECT * FROM protect WHERE UserName='"& UserName &"'", database, 1
    If rsLogin.recordcount = 0 then
        rsLogin.close
        set rsLogin=nothing
        Response.Redirect("../home/register.asp?action=msg&txt=Brugernavnet findes ikke!")
else
   
    if Request.Form("PassWord") = UserPass then
        Session.Timeout = 20
        Session("Rettigheder") = rsLogin("Rettigheder")
        Session("id") = rsLogin("id")
        Session("UserName") = rsLogin("UserName")
        Session("FirstName") = rsLogin("FirstName")
        Session("LastName") = rsLogin("LastName")
        Session("Email") = rsLogin("Email")
        Update = "UPDATE USERS SET UserUpdate = '" & Now() & "' WHERE UserName='"& UserName &"'"
        database.execute(Update)
        rsLogin.close
        set rsLogin=nothing
        Response.Redirect("../Data_home/Data_default.asp")

    else
        rsLogin.Close
        set rsLogin=nothing
        Response.Redirect("Data_AD/inc_logging.asp?action=fejl")
    end if   
end if

hmm det virker ikke så lad os bare sige det var det har fundet et andet som virker :D