
05/06/2002, 13:14
|
| | Fecha de Ingreso: marzo-2002
Mensajes: 50
Antigüedad: 23 años, 1 mes Puntos: 0 | |
Re: E-commerce Dim maxfilas
maxfilas=CInt(20)
Dim carro_compra(20,6) 'maxfilas es 20
For i=0 To 20
carro_compra(i,0)=0
Next
Dim nfilas
nfilas=CInt(nfilas)
nfilas=0
Session("filas")=nfilas
Session("carrito")=carro_compra
Session("mfilas")=maxfilas
response.redirect("index2.asp?state=3")
este es el codigo que genera el carro temporal., este tenia un limite de 20 items
cuando quieras agregar o qutar del carro
solo usa un indice.,
para agregar a la base de datos cuando ya confirmes la compra recorre el arreglo con dos FOR enlazados.
facil., no?
suerte |