Session Variable for Shopping Cart

Discussion in 'ASP General' started by TRB_NV, Apr 12, 2006.

  1. TRB_NV

    TRB_NV Guest

    I'm losing information from my Session when I change pages or start the same
    page over again. I simplified the code so the example is really clear. The
    sample code that follows is supposed to generate a random number and put it
    into an Array and store it in the Session variable and then when it runs the
    next time, generate another random number and display the entire Array
    contents, by pulling the information out of the Session. I'd greatly
    appreciate someone with fresh eyes taking a look at this code. Thanks.


    if Request.Form("clear") = "true" then
    Session("ItemCount") = 0
    clearcart = ""
    end if

    dim cart(999,9)

    Randomize Timer
    r1 = Rnd
    r1 = r1 * 1000000
    intOrderID = 1000000 + Int (r1)

    intItemCount = Session("ItemCount")

    if intItemCount = 0 then
    intItemCount = 1
    Session("ItemCount") = intItemCount
    intItemCount = intItemCount + 1
    Session("ItemCount") = intItemCount
    end if

    Session("ItemCount") = intItemCount



    for x = 1 to intItemCount
    response.write x & " " & xcart(x,1) & "<br>"

    <form action="array.asp" method="post">
    <input type="hidden" name="clear" value="true">
    <input type="Submit" name="Submit" value="Clear Shopping Cart">
    <form action="array.asp" method="post">
    <input type="hidden" name="clear" value="false">
    <input type="Submit" name="Submit" value="Reload">
    TRB_NV, Apr 12, 2006
    1. Advertisements

  2. You have a hidden field whose value is always true. Hence the code at the
    top of your page that resets everything always runs.
    Anthony Jones, Apr 12, 2006
    1. Advertisements

  3. TRB_NV

    TRB_NV Guest

    Remarked out the part about clearing the Session contents, but I'm still not
    getting the data from the Array I stored in it:

    'if Request.Form("clear") = "true" then
    ' Session.Contents.Remove("ShoppingCart")
    ' Session("ItemCount") = 0
    ' clearcart = ""
    'end if

    From everything I've read, it appears that I can store an Array in a Session
    variable and recall it. Some how it's not working properly.
    TRB_NV, Apr 12, 2006
  4. You've got these lines in your code too



    Are you saying xcart does contain the same data as cart?

    What if you change this to:-

    xcart = cart does it still fail?
    Anthony Jones, Apr 12, 2006
  5. TRB_NV

    Mike Brind Guest

    You're not preserving the array. Every time the page loads, you create
    an array called cart, with 10 columns and 100 rows. Arrays are empty
    when you first declare them. All you are doing is populating row
    intItemCount with a value. That's why, as you refresh the page, you
    see one (changing) value slowly crawling down the page.

    Declaring such a large array as you do, when you can only use 2 cols,
    is massively expensive on memory Each element in an array is a
    variant, and is 16 bytes. You have created a structure in memory that
    will consume 10*100*16 bytes - that's 15.625 kilobytes per session.

    It's much easier, and cheaper to store your order numbers in a comma
    delimited string in one session variable, along with a counter to tell
    you how many there are. Then you can use the split function to convert
    the string to a one-dimensional array and iterate through the elements.

    Dim orders, i, r1, intOrderID
    Randomize Timer
    r1 = Rnd
    r1 = r1 * 1000000
    intOrderID = 1000000 + Int (r1)

    If Session("Item") = "" Then
    Session("Item") = Session("Item") & intOrderID
    Session("ItemCount") = 1
    Session("ItemCount") = Session("ItemCount") + 1
    Session("Item") = Session("Item") & "," & intOrderID
    End If

    orders = split(Session("Item"),",")
    For i = 0 to Session("ItemCount")-1
    response.write i + 1 & " " & orders(i) & "<br>"
    Mike Brind, Apr 12, 2006
  6. TRB_NV

    Mike Brind Guest

    Actually, the array you create is 10 cols by 1 thousand rows so it's
    156.25 kilobytes in memory! If you have a business plan that shows you
    will get 1000 orders per customer per session, lemme see it!

    Mike Brind, Apr 13, 2006
    1. Advertisements

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.