Sessions i .net ?

HttpContext.Current.Session

måske

Altså forstået på denne måde ?

HttpContext.Current.Session("Test") = "Test"

/Websam

hvis det er der som du vil

Helt nødagtigt vil jeg dette :

Public Shared Function GetLogin(ByVal User As String, ByVal Pass As String)
    Dim objComm = New SqlCommand
    objComm.CommandText = "Select Id, Userlevel From tbl_user_login Where (Username = User And Password = Pass)"

    Dim Rs As SqlDataReader
    Rs = objComm.ExecuteReader
    If Rs.HasRows Then
        Do While Rs.Read
            HttpContext.Current.Session("Login") = True
            HttpContext.Current.Session("UserId") = Rs("Id")
            HttpContext.Current.Session("UserLevel") = Rs("Level")
            Return True
        Loop
    Else
            Return False
    End If
End Function

/Websam

prøv og se om ikke det virker

husk at beskyt dig mod SQL injection

Da jeg forsøger mig med at bygge op omkring ideen med et data lag, buisness lag og design lag.

/Websam

og hvordan gør jeg det ?

/Websam

nemmeste : parameters

Kan du give et eksempel ?

/Websam

objComm.CommandText = "Select Id, Userlevel From tbl_user_login Where (Username = @User And Password = @Pass)"
objComm.Parameters.Add("@User", SqlDbType.VarChar)
objComm.Parameters.Add("@Pass", SqlDbType.VarChar)
objComm.Parameters("@User").Value = User
objComm.Parameters("@Pass").Value = Pass

vil jeg tro

Ok på den måde og det sikre 100% mod injections ?

/Websam

Og det sig også gældende ved insert og update ?

/Websam

ja (så vidt jeg ved)

ja

Jeg får en fejl der lyder som følger :

ExecuteReader: Connection property has not been initialized.

Og det tyder jo på at jeg ikke har forbindelse til databasen. Til har jeg lavet følgende med det virker sikkert ikke.

Public Shared Function SqlConnect() As IDbConnection
    Dim Conn As SqlConnection
    Dim Sql As String = "Data Source=NEWAGE-SQL;Initial Catalog=Asp-Classes;User Id=PortalUser;Password=trolddom;"
    Conn = New SqlConnection(Sql)
    Conn.Open()
End Function

kan du hjælpe med det ?

Public Shared Function SqlConnect() As IDbConnection
    Dim Conn As SqlConnection
    Dim Sql As String = "Data Source=NEWAGE-SQL;Initial Catalog=Asp-Classes;User Id=PortalUser;Password=trolddom;"
    Conn = New SqlConnection(Sql)
    Conn.Open()
    SqlConnect = Conn ' <----skal den her ikke være der
End Function

sammen med en

objCommand.Connection = SqlConnect

Cool takker for hjælpen det ser ud til ta jeg kan logge på og at session virker ganske fint, smid et svar :o)

/Websam

En lille en mere hvorfor bliver værdien for brugernavn og password ikke slette i textbox ?

/Websam

Hm.

Så er nok ovre i noget postback/viewstate/etellerrandet som ligger over min viden

og et svar

websam>> hvis du prøver at lave en 3-tier model er det nok ikke pænt at hive fat i session helt nede i data-laget

cyberfessor >> andre ideer til at sende userid og userlevel hvis de findes i databasen istedet for med sessions ?

/Websam

du bør lave en UserKlasse som indeholder de forskellige informationer du har brug for (UserId, Userlevel) og returnere det object fra datalaget op i dit businesslag som så sørgede for at gemme det i session.

cyberfessor >> Og kan du give et eksempel på det ud fra min kode ovenfor, jeg er ret grøn i det her .net

arne_v >> Har løst textbox issue ved at redirecte efter buttonclick.

/Websam

public class User {
  public int Id;
  public int Level;
}

Dit datalag:

public User GetUser(string user, string pass) {

    ....

    User u = null;
   
    SqlDataReader rs = objComm.ExecuteReader(CommandBehavior.CloseConnection);
    if (rs.Read()) {
      u = new User();
      u.Id = (int)rs["UserId"];
      u.Level = (int)rs["UserLevel"];
    }
   
    rs.Close();

    return u;
}

Dit BusinnesLag:


public User User {
  get {
        object o = HttpContext.Current.Session["user"];
        if (o == null) return null;
        else return (User)o;
}

public bool ValidateUser(string user, string password) {
    DataLag dl = new DataLag();

    User u = dl.GetUser(user, password);

    if (u == null) return false;
    else {
      HttpContext.Current.Session["user"] = u;
      return true;
    }
}

Ok jeg prøver lige om jeg kan for det oversat til vb :o)

/Websam

:) http://authors.aspalliance.com/aldotnet/examples/translate.aspx

så fik jeg det oversat men du laver kun en session nemmelig :

HttpContext.Current.Session["user"] = u

Ideen var jo at jeg skulle have fat i både UserId Og UserLevel ?

/Websam

jo, men læg mærke til at jeg gemmer hele User-objectet i sessionen. De enkelte værdier er gemt inde i dette object:

User u = (User)Session["User"];

int id = u.Id;
int level = u.Level;