ændring af password

tag brugerens id med når du logger ind.

hvordan gør jeg det?

hjælp en eller anden :D

altid i admin-systemer skal man når brugeren logge ind gemme hans brugerid. F.eks. til den slags opdateringer her.

gem den i en session .. session("userid") .. så har du det altid... og kan bruge det til at se hvem man er logget ind som og bruge det ID til at slå brugeren op i tabellen (og sikre dig man kun retter sit eget)

her er mit login script - det er stjålet så spørg ikke hvorfor jeg gør sådan :)

<%
SET RS = Server.CreateObject("ADODB.Connection")
rs.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/db/hpff.mdb")

If Request("mode") = "Check" then

Function unQuote(strTekst)
  strTekst = Trim(strTekst)
  unQuote = Replace(strTekst,"%","53")
End Function

    ' Gemmer formfelterne i Variabler
        strBrugernavn = unQuote(request("username"))
        strPassword = unQuote(request("password"))

       
       
  Sql = "SELECT COUNT(*) as Found from administrator WHERE (navn = '" & strBrugernavn  & "') and (password ='" & strPassword  & "')"
  Set LO = RS.Execute(Sql)
  if LO("Found") = 0 then
    Session("login") = "NO"
    error = "Det indtastede brugernavn eller kodeord er ikke korrekt"
  else
  strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/db/hpff.mdb")
  Set myConn = Server.CreateObject("ADODB.Connection")
  myConn.Open strDSN
  strSQL = "SELECT * FROM administrator where (navn = '" & Request("navn") & "') and (password ='" & Request("password") & "')"
  Set ez = myConn.Execute(strSQL)
    Session("login") = "YES"


    Session("strAdminid") = 1  <--- denne fungerer KUN hvis jeg forudbestemmer    værdien... jeg har pøvet en del efterhånden... Request("adminid") Response.Write("adminid") osv osv... men den vil bestemt ikke fange værdien


    Response.Redirect "../kontrolpanel/kontrolpanel.asp"
    EZ.Close
    RS.Close
    myConn.Close
  end if
end if
%>