Sessions

Mener du:
<% = Session(\"RabatOrdning\") %>

Er det ikke det her du mener :

Sesion(\"RabatOrdning\") = Cstr(RS(\"RabatOrdning\"))

jo Sesion(\"RabatOrdning\") = Cstr(RS(\"RabatOrdning\")).
men jeg har brug for at vide hvad min session hedder eks session(10)

Kobojt

Ifb. med mit svar hedder sessionsvariablen \"RabatOrdning\" og dens værdi er RS(\"RabatOrdning\")....

Min session ligger i et loop hvor jeg skal tjekke hvilken rabatordning et produkt tilhører, hvis et produkt har en anden rabatordning skal jeg lave en ny session til det

Lidt kode ?

If isarray(Session(\"ID\")) Then
            For i = 1 To UBound(Session(\"ID\"))   
                Com.CommandText = \"Select * From Vare Where id = \" & Session(\"ID\")(i)
                Rs.Open com,,1,3       
                For p = 1 To Rs.RecordCount
                Session(Cstr(RS(\"RabatOrdning\"))) = 0
                %>
...
...
...   
                    <%
                    enhedspris = FormatNumber(RS(\"Pris\"),2)
                    antal = int(Session(\"Antal\")(i))
                    \'asdf = Cstr(RS(\"RabatOrdning\"))
                    \'Session(Cstr(RS(\"RabatOrdning\"))) = Session(Cstr(RS(\"RabatOrdning\"))) + antal
                    Sesion(\"RabatOrdning\") = Cstr(RS(\"RabatOrdning\"))
                        Total = Total + enhedspris*antal
                    Response.Write Cstr(RS(\"RabatOrdning\"))& \" \"
                    Response.Write Session(Cstr(RS(\"RabatOrdning\")))
                    temp = Session(Cstr(RS(\"RabatOrdning\")))
                    Rs.Close       
                next
            NexT
        end if       

Du vil have en liste over alle rabatordninger og hvormange produkter der er, for hver rabatordning ?

ja lige precis

Måske kan du bruge et dictionary ?

øhh, hvad er det og hvordan bruger man det ?

har lige læst lidt om det, når man henter fra et dictionary (objDictionary.item(\"xxx\")), hvordan ville du så gøre det dynamisk ?

Noget i den her stil :

Set Session(\"Rabatordninger\") = Server.CreateObject(\"Scripting.Dictionary\")

I din løkke :

If Session(\"Rabatordninger\").Exists(RS(\"Rabatordning\") then
  Session(\"Rabatordninger\").Item(RS(\"Rabatordning\") = CInt(Session(\"Rabatordninger\").Item(RS(\"Rabatordning\")) + 1
Else
  Session(\"Rabatordninger\").Add RS(\"Rabatordning\"), 1

udskrivning :

RabatOrd = Session(\"Rabatordninger\").keys
For each Rabat in RabatOrd
Response.Write \"Rabatordning\" & Vare & \" Antal : \" & Session(\"RabatOrdninger\").item(vare)
next

Håber du kan bruge det.. Det er ikke testet, noget jeg lige \"fandt\" på....

Jeg kigger lige på det og vender tilbage

OK...

Jeg kan ikke skrive ud, hvor skal \"vare\" erklæres ?

Ja ok, en CUT&PASTE fejl... \"vare\" skal udskiftes \"Rabat\" og måske skal der stå \"CStr(Rabat)\" ....

Det giver en exception occurred fejl

Øhhhhhhhhhh.........

Ja, jeg har konfereret med min bog, men kan heller ikke gennemskue hvad der er galt

Prøv dette :

Ordning = RS(\"RabatOrdning\") og prøv at skifte \"RS(\"Rabatordning\")\" ud med \"ordning\" ....

..Kan ikke umiddelbart se hvad der er galt, roder i blinde...

Tak! så køre det s..!

Kanon....