Tengo este codigo
<% if isobject(Session("carrito")) then
set carrito= Session("carrito")
else
set carrito = Server.CreateObject("Scripting.Dictionary&quo t;)
end if
arrClav = carrito.Keys()
arrElem = carrito.Items()
Set conexion = Server.CreateObject("ADODB.Connection")
set RsProd = Server.CreateObject("ADODB.RecordSet")
conexion.Open "tienda"
for i= 0 to carrito.Count-1
SQL = "SELECT DESCRIPCION,PRECIO FROM PRODUCTOS WHERE CODIGO ="& arrClav(i)
RsProd.Open SQL,conexion,2,3
pre= RsProd("PRECIO")
totpro = pre*arrElem(i)
totped=totped+totpro
%>
pero cuando pido que me muetre el valor de <%=arrElem(i)%> , <%=totpro%> y <%=totped%>
no sale nada.
