Avatar billede neoo Nybegynder
30. december 2003 - 01:10 Der er 9 kommentarer og
1 løsning

sesion læsning

Hej til alle.


jeg en login, hvor brugerne kan logge ind, også vil jeg gerne have at hans login vises på sidens top. (så som "du er logget ind som xx.)

hvordan ser sådan noget kode ud =?
Avatar billede eagleeye Praktikant
30. december 2003 - 01:14 #1
Hvis du har gemt navnet i session variablen så kan du prøve noget med:

Response.Write "du er logget ind som " & session("brugernavn")



Når du tjekker for brugernavn og password og det er de passer samme tager du og ligger navnet ind i session variablen i det login script:

  session("brugernavn") = recordSet("brugernavn")
Avatar billede neoo Nybegynder
30. december 2003 - 01:17 #2
<%
if session("login") = "" Then
Response.redirect("login.asp")
end if
%>

og det får jeg et navn som yesmate ! på alle login :(
Avatar billede neoo Nybegynder
30. december 2003 - 01:18 #3
hvordan kan jeg få specifik recordsæt navnet ?
Avatar billede eagleeye Praktikant
30. december 2003 - 01:19 #4
Den if sætnign du har vist har en Session("login") = "" det tjekker om en bruger er logget ind.
På den side hvor du sætter Session("login") skal du også gemme brugernavnet i session
Avatar billede neoo Nybegynder
30. december 2003 - 01:24 #5
min login ser sådan ud :


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

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

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

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

  Sql = "Select Count(*) as Found from user where (username = '" & strUsername  & "') and (password ='" & strPassword  & "')"
  Set LO = RS.Execute(Sql)
  if LO("Found") = 0 then
    Session("login") = ""
    error = "Du blev ikke godkendt af systemet !"
  else
  strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/min.db")
  Set myConn = Server.CreateObject("ADODB.Connection")
  myConn.Open strDSN
  strSQL = "SELECT * FROM user where (username = '" & Request("username") & "') and (password ='" & Request("password") & "')"
  Set ez = myConn.Execute(strSQL)
    Session("login") = "yes mate"
    Response.Redirect "default.asp"
    EZ.Close
    RS.Close
    Conn.Close
  end if
end if
%>
Avatar billede neoo Nybegynder
30. december 2003 - 01:25 #6
og der specificere jeg ikke login navnet :( den gemmes ikke i sessionet vel ?
Avatar billede eagleeye Praktikant
30. december 2003 - 01:27 #7
Nej ikke endnu, men det kan tilføjes ved at tilføje en linje lige efter denne:

Session("login") = "yes mate"

Som er denne som smider brugernavnet ind i session variablen:
Session("brugernavn") = ez("username")


---Så det bliver:

  Set ez = myConn.Execute(strSQL)
    Session("login") = "yes mate"
    Session("brugernavn") = ez("username")
    Response.Redirect "default.asp"
Avatar billede neoo Nybegynder
30. december 2003 - 01:34 #8
supper tussind tak for hjælpen :) :) :) nu virker det hele :):)
men kan du ikke indlægge et svar så kan du få nogle poin
Avatar billede eagleeye Praktikant
30. december 2003 - 01:35 #9
Ok her et svar ;)
Avatar billede neoo Nybegynder
30. december 2003 - 01:53 #10
jeg takker igen for hjælpen :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester