Poster der svarer til login!?

I den SELECT som vælger sælgerens ordrer, skal du laver en

  ...WHERE sæaelgerid = \" & Session(\"saelgerid\")

så får du kun ordrer fra den sælger der er på.

sone:

Jeg har ikke en session der hedder salger_id....du får lige mine sessions:

Session(\"Admin\") = false
Session(\"Bruger\") = false
Session(\"Brugernavn\") = \"\"
Session(\"Password\") = \"\"
Session(\"adgang\") = false

Jeg bruger Session(\"Brugernavn\") som nøgle til udvælgelsen.

Får iøvrigt følgende fejl:

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression \'Saelger_id=\'.

når jeg bruger denne sætning:

rs.Open \"SELECT * FROM Main_table WHERE Saelger_id=\" &Session(\"Brugernavn\"), Connect, 1, 3

Du skal have \' omkring dit brugernavn:

...WHERE Saelger_id=\'\" &Session(\"Brugernavn\") & \"\'\",....

Hmmm - nu ligger der én post i tabellen, men den bliver ikke hentet frem i oversigten....kan det være fordi den ikke husker min session(\"Brugernavn\")?

Den melder ikke nogen fejl!

Selve din SQL-sætning, prøv at opbygge den i variabel først og udskriv den i browseren - så kan du se om der er fejl.

Hmmm - den skriver følgende:

SELECT * FROM Main_table WHERE Saelger_id=\'\'

Så den husker vel ikke min session alligevel!?

Korrekt.

Hvordan kan jeg så få den til at huske min session???

Du skal nok få flere point!

Session(\"Brugernavn\") = \"\"
du indsætter vel en værdi for Brugernavn et eller andet sted ?

Jeps - det gør jeg der hvor jeg taster brugernavn og login!

Derfra ryger jeg ind i en menu hvor jeg kan vælge \"Opret\", \"Ret\" eller \"Slet\".

Så jeg skal vel lave sætningen Session(\"Brugernavn\") = Request.Form(\"username\") og så ligge den i et hidden field eller hvad??

Session(\"Brugernavn\") = Request.Form(\"username\")
burde være nok. Check fra start og find ud af hvor det er at brugernavnet ikke kommer med videre.

Hmmm - opgiver det sq!
Den sender ikke brugernavnet videre end til mit loginscript og jeg kan ikke få sendt det videre derfra!

Så må jeg finde en anden løsning.

Du giver let op :)
Det skal da virke med at ligge det i en session!

sone:

Jamen det gør det åbenbart ikke!

Ved ikke hvor jeg skal gribe henne....måske du vil hjælpe mig hele vejen igennem!?

Strukturen ser således ud:

1: Login-site
  1.1: Login-script
        1.2: Menu
            1.2.1: Opret
                    1.2.1.1: Oprettelsesskema
            1.2.2: Ret
                    1.2.2.1: Oversigt over ordre
                            1.2.2.1.1: Retteskema
            1.2.3: Slet
                    1.2.3.1: Oversigt over ordre
                            1.2.3.1.1: Slettescript

Håber det giver lidt mening!

Jeg regner med at man indtaster informationer i 1, som sendes videre til 1.1 til validering.
Så er det i 1.1 (når brugeren er godkendt) at du skal skrive din session.

1.1 er mit loginscript der således ud:

<% Option Explicit %>
<% Response.Buffer = True %>

<%
Dim username, password, url

\'definerer formularfelterne fra defaultsiden
username = Request.Form(\"username\")
password = Request.Form(\"password\")

\'definerer databasevariabler
Dim Connect, UserRS, SQL
Set Connect = Server.CreateObject(\"ADODB.Connection\")
Connect.Open \"sb_ordre\"

\'henter brugerens data fra databasen
SQL = \"SELECT * FROM Login WHERE username=\'\"&replace(replace(Request.form(\"username\"), \"\'\", \"¤#¤\"), \"\"\"\", \"¤##¤\")&\"\' AND password=\'\"&replace(replace(Request.Form(\"password\"), \"\'\", \"¤#¤\"), \"\"\"\", \"¤##¤\")&\"\'\"
Set UserRS = Connect.Execute(SQL)

\'session variable
Session(\"Admin\") = false
Session(\"Bruger\") = false
Session(\"Brugernavn\") = \"\"
Session(\"Password\") = \"\"
Session(\"adgang\") = false

If not UserRS.bof then
    Session(\"adgang\") = true
    Session(\"Brugernavn\") = username
    Session(\"Password\") = password
    url = \"menu.asp\"
else
    url = \"retry.asp?error=ja\"
End if

\'lukker forbindelsen til databasen
Connect.Close
Set Connect = Nothing

\'omdirrigerer til den angivne URL
Response.Redirect(url)
%>

Vær logisk og systematisk:
- Indeholder variablen username noget?
- Kommer du ind i IF-sætningen
- osv.

PS. Hvis du skal skrive én \' til databasen, så sender du 2:

...WHERE username=\'fish\'\'n\'\'chips\'\"

Loginscriptet validerer og sender videre til menuen hvis username og password er i tabellen!

Variablen username indeholder den korrekte værdi og jeg kommer også ind i min If-sætning (response.write Session(\"Brugernavn\"))

Så jeg kommer rigtig nok videre til menuen!

Dine \"slet\" session-linier - prøv at flytte dem til ELSE-delen.

Mere om sessions:
http://www.html.dk/tutorials/asp/lektion12.asp

Jeg har ikke nogen slet-sessions.....jeg sletter poster via et javascript!

\'session variable
Session(\"Admin\") = false
Session(\"Bruger\") = false
Session(\"Brugernavn\") = \"\"
Session(\"Password\") = \"\"
Session(\"adgang\") = false

Det kalder jeg at slette en session

Nå okay - var ikke klar over at det var en slet-session!
Troede du mente når jeg skal slette en post!

Nu ser det således ud:

If not UserRS.bof then
    Session(\"adgang\") = true
    Session(\"Brugernavn\") = username
    Session(\"Password\") = password
    url = \"menu.asp\"
else
    Session(\"Admin\") = false
    Session(\"Bruger\") = false
    Session(\"Brugernavn\") = \"\"
    Session(\"Password\") = \"\"
    Session(\"adgang\") = false
    url = \"retry.asp?error=ja\"
End if

virker det?

Jeg kan stadig logge på og få min menu, men jeg kan stadig ikke få mine poster frem!

Min menukode ser således ud:

<%
If isEmpty(Session(\"adgang\")) Then
    Response.Redirect(\"retry.asp?error=ja\")
    If Session(\"login\") = True Then
        Response.Redirect(\"login.asp\")
    End If
End if
%>
<%
Dim Connect, rs

Set Connect = Server.CreateObject(\"ADODB.Connection\")
Connect.Open \"sb_ordre\"

Session(\"Brugernavn\") = \"\"

Set rs = Server.CreateObject(\"ADODB.Recordset\")
rs.Open \"SELECT * FROM Login WHERE Username=\'\"&Session(\"Brugernavn\")&\"\'\", Connect, 1, 3
%>

Jeg er lidt i tvivl om hvad min Session(\"Brugernavn\") skal være lig med!

Session(\"Brugernavn\") = \"\"
sletter jo det brugernavn du skal bruge - hvorfor gør du det?

Hvad skal jeg skrive i stedet for \"\".....som jeg opfatter Request.form(\"username\") skal jeg jo have et formularfelt der hedder username på den forgående side (login.scriptet) og det er der jo ikke!

Nej, for der ligger du jo username ind i session - og så følger den bare med - helt automatisk !

Hmmm - dvs. jeg skal skrive Session(\"Brugernavn\") = username eller skal jeg bare skrive Session(\"Brugernavn\")???

Session(\"Brugernavn\") henter den gemte værdi.

Det vil sige at det skal se således ud:

<%
If isEmpty(Session(\"adgang\")) Then
    Response.Redirect(\"retry.asp?error=ja\")
    If Session(\"login\") = True Then
        Response.Redirect(\"login.asp\")
    End If
End if
%>
<%
Dim Connect, rs, user

Set Connect = Server.CreateObject(\"ADODB.Connection\")
Connect.Open \"sb_ordre\"

Session(\"Brugernavn\")
%>

Vi er tilbage til for ca. 2 timer siden:

...WHERE Saelger_id=\'\" & Session(\"Brugernavn\") & \"\'\",....

Okay - nu sender den godt nok min session videre, men den vil ikke vise mine poster!

Vi nærmer os en løsning tror jeg!

Okay - nu virker det som det skal.....tusind tak for hjælpen....du har reddet min dag og du får 100 point for din hjælp!

Selv tak.