Tengo un problema. Estoy haciendo una aplicación de e-commerce con asp y no consigo borrar productos.
Este es el código:
El carrito tiene 3 productos, la direccion que uso es borraritem?Id=1
Borrarcesta es una pagina ASP que vacía el contenido de la cesta al completo
Puedes ver como funciona en
http://www.asociacion-aest.org/tempo...acategoria.asp
y descargar un archivo con todo el codigo en:
http://www.asociacion-aest.org/tempo...da Virtual.zip
No hay mensaje de error, pero en vez de borrarse como debería, se vacía el carrito y me pone la tabla sin datos, pero en la primera fila un cubo de basura. Pruebalo tu mismo
Codigo de borraritem.asp:
<% Response.Buffer = True %>
...
<%
Dim Id,cuenta,Elementos
Dim matriz,matriztemporal()
Dim I,j
cuenta = 0
Id = Cint(Request.QueryString("Id"))
matriz = Session("matrix")
Elementos = Ubound(matriz,2)
If(elementos = 0) then Response.Redirect("borrarcesta.asp")
Redim matriztemporal(3,Elementos-1)
for I = 0 to Elementos
If Elementos <> Id then
matriztemporal(0,cuenta) = matriz(0,I)
matriztemporal(1,cuenta) = matriz(1,I)
matriztemporal(2,cuenta) = matriz(2,I)
matriztemporal(3,cuenta) = matriz(3,I)
cuenta = cuenta + 1
End If
next
Session("matrix") = matriztemporal
Response.Redirect "anadirproducto.asp"
%>