Sessions?

Hej TjaZ

Du kan sagtens begge dele. Et øjeblik, så får du et eksempel.

hmm kan du så fortælle mig hvorfor min if sætning ikke virker hvis mit felt er et tesktfelt, men godt når det er et talfelt?

Her er et eksempel, hvor jeg både sætter session = tekstfelt og putter en sessionværdi i databasen.

Dim brugernavn, password, Conn, rs

brugernavn = Trim(Replace(Request.Form("brugernavn"), "'", "")) 'Fjerner plinger (') for at man ikke kan snyde sig igennem
password = Trim(Replace(Request.Form("password"), "'", "")) ' -||-

If brugernavn = "" Or password = "" Then
errorTxt = "Både brugernavn og password skal indtastes for at du kan logge ind." 'Fejltekst til udskrivning ved manglende indtastning
End If

If errorTxt = "" Then
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("users.mdb")
Conn.Open DSN

Set rs = Conn.Execute("SELECT * FROM users WHERE username='" & brugernavn & "' AND password='" & password & "'")
If Not rs.EOF Then
Session("login") = rs("id") 'Bruges til at finde ud af hvem vedkommende er
Session("level") = rs("level") 'Bruges til at finde ud brugerens level
Session("Brugernavn") = rs("name")
Session("Selskab") = rs("Company")
Conn.Close
Set Conn = Nothing

' skriv i log

  strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("log.mdb")
  Set myConn = Server.CreateObject("ADODB.Connection")
  myConn.Open strDSN
  SQLstat = "INSERT INTO log (dato, username, name, company) values (NOW(), '" & brugernavn & "', '" & Session("Brugernavn") & "', '" & Session("Selskab") & "' )"
  Set rs = myConn.Execute(SQLstat)
  'Rydder op efter os
  myConn.Close
  Set myConn = Nothing

jeg tror du har misforstået mit spm lidt..

jeg har en if-sætning som hedder

if session("noget") = rs("tekstfelt") then
response.write ("Det virker")
else
response.write ("Det virker ikke")
end if

og fordi mit felt som jeg sætter session = er et tekst felt får jeg hver gang "Det virker ikke", men efter at jeg ændrede mit felt i databasen fra tekst til tal har det virket 100%... og så er det jeg gerne vil vide hvorfor?

Jeg ved ikke hvorfor, men jeg har flere gange måtte gøre dette:

MyTekstfelt = rs("tekstfelt")

If session("noget") = MyTekstfelt then
response.write ("Det virker")
Else
response.write ("Det virker ikke")
End If

Prøv dette.

er også prøvet men det kunne jeg heller ikke så til at virke :/

Prøv med

Dim MyTekstfelt as Str

okay .. det prøver jeg så en anden gang .. har ikke lige tid til at lege mere med det nu ... men jeg synes bare at det var mærkeligt...

kan man sætte alle felttyper = en session så? hvis bare man nu finder den rigtig måde at gøre det på :/ så?

Ja, hvis værdien svarer til felttypen.
Hvad med point's ?

dem får du self :) .. med et svar "Ja, hvis værdien svarer til felttypen."

:)

/TjaZ