Shopping Cart Totals - Show all the time?

Hi,

this is the code that i am using, and it is working fine.

<% 'Show shopping cart total
    dim vcCartArr, vcCartIndex, v, scantidadCart7, vcTotal, vcItems

    vcCartArr=Session("pcCartSession")
    vcCartIndex=Session("pcCartIndex")
    vcTotal=Cint(0) 'calculates the cart total
    vcItems=Cint(0) 'counts items in your cart

    for v=1 to vcCartIndex
     if vcCartArr(v,10)=0 then
      vcItems=vcItems + vcCartArr(v,2)
      vcTotal=vcTotal+(vcCartA rr(v,2)*vcCartArr(v,17))
      vcTotal=vcTotal+(vcCartA rr(v,2)*vcCartArr(v,5))
      vcTotal=vcTotal-vcCartAr r(v,30)
      vcTotal=vcTotal+vcCartAr r(v,31)
      vcTotal=vcTotal-vcCartAr r(v,15)
      'vcTotal=vcTotal + vcCartArr(v,5) + (vcCartArr(v,3)*vcCartArr(v,2))
     end if
    next
 %>
 
    <%if vcItems > 0 then %>
    <%response.write vcItems%> Product(s)
        in cart Total: <%response.write scCurSign & money(vcTotal)%>
<%else%>
   
             0 Product(s) in cart Total &pound;0.00
    <%end if%>  
        
             &nbsp;&nbsp;&nbsp;|&nbsp;&nbsp;&nbsp ;
             <a href="/pc/checkout.asp">Checkout</a>
    </div>

Hi

Can anyone help with this issue im having

I have moved the <!--#include file="Store/pc/SmallShoppingCart.asp"--> into the header

I wanted to show the cart on the other side of page

When I view the site I get:

Microsoft VBScript compilation error '800a0411'

Name redefined

/Store/pc/SmallShoppingCart.asp, line 5

dim vcCartArr, vcCartIndex, v, scantidadCart7, vcTotal, vcItems
----^

Any input would be greatly received

Neil

Hi Matt

Thanks for the advice, in an effort to resolve another issue I moved a clean copy of the footer into the root directory.

I didnt realise you couldnt have 2 in the one place

Thanks

Neil