% dim CartEmpty, numItems CartEmpty=true numItems=0 If IsArray(Session("cart")) = false then CartEmpty = true else acart=session("cart") for i=lbound(acart) to ubound(acart) if acart(i,0)<>"" and acart(i,1)<>"" then numItems=numItems+acart(i,1) end if next end if If numItems=0 then CartEmpty=true else CartEmpty=false end if %>
| |||||||||||||||||||||