Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Carlos Moreira

Como adicionar mais de 1 na quantidade

Por , em ASP Clássico

Recommended Posts

Carlos Moreira    0

Carlos Moreira
Postado

Olá pessoal encontrei esse código na net Carrinho de compras ele ta rodando perfeitinho só uma coisa.

 

Como eu faço para inserir a quantidade do produto no código da página "car.asp"?

 

Pode usar na Request.Querystring mesmo depois passo pra Request.Form aqui!

 

 

segua abaixo o codigo:

 

"default.asp"

 

<HTML> <BODY> <CENTER> <a href="car.asp?id=1&name=Primeiro&price=100">Produto 1</a><br><br> <a href="car.asp?id=2&name=Segundo&price=200">Produto 2</a><br><br> <a href="car.asp?id=3&name=Terceiro&price=300">Produto 3</a><br><br><br><br> <a href="car.asp">Ver Carrinho</a> </CENTER> </BODY> </HTML>

#########################

 

"car.asp"

 

<% 'Define Constantes CONST cartpid = 0 CONST cartpname = 1 CONST cartpprice = 2 CONST cartpquantity = 3 'Pega Carrinho IF NOT isArray(Session("cart") ) THEN DIM localcart(4,20) ELSE localcart = Session("cart") END IF 'Pega Informações productid = TRIM(Request.QueryString("id") ) productname = TRIM(Request.QueryString("name") ) productprice = TRIM(Request.QueryString("price") ) 'Adicionar ao Carrinho IF productid <> "" THEN foundit= false FOR i=o to Ubound (localcart,2) IF localcart(cartpid,i) = productid THEN localcart(cartpquantity,i) = localcart( cartpquantity, i) + 1 foundit = TRUE EXIT FOR END IF NEXT IF NOT foundit THEN FOR i=0 to UBOUND(localcart,2) IF localcart(cartpid,i) = "" THEN localcart(cartpid,i) = productid localcart(cartpname,i) = productname localcart(cartpprice,i) = productprice localcart(cartpquantity,i) = 1 EXIT FOR END IF NEXT END IF END IF 'Atualiza Carrinho IF Request("updateQ") <> "" THEN FOR i=0 to Ubound (localcart,2) newQ = TRIM(Request("pq" & localcart(cartpid,i) ) ) deleteproduct = TRIM(Request.QueryString("productid") ) IF newQ = "" or newQ = "0" or deleteproduct <> "" THEN IF deleteproduct = localcart(cartpid,i) THEN localcart(cartpid,i) = "" END IF ELSE IF isNumeric(newQ) THEN localcart (cartpquantity,i) = newQ END IF END IF NEXT END IF 'Update Sesssion Carrinho Session("cart") = localcart %> <center> <FORM method="post" action="car.asp" Name="form"> <input name="updateQ" type="hidden" value="1"> <TABLE BORDER=0> <TR> <TD> <TABLE Border=1> <TR> <TD Align="center"><b>Produto</b></TD> <TD Align="center"><b>Preço</b></TD> <TD Align="center"><b>Quantidade</b></TD> </TR> <% total = 0 %> <% FOR i=0 TO Ubound(localcart,2) %> <% IF localcart(cartpid,i) <> "" THEN %> <% total = total + localcart(cartpprice,i)*localcart(cartpquantity,i)%> <TR> <TD><%=localcart(cartpname,i)%></TD> <TD><%=localcart(cartpprice,i)%></TD> <TD><INPUT TYPE="TEXT" Size="1" Value="<%=localcart(cartpquantity,i)%>" Name="pq<%=localcart(cartpid,i)%>"> <a href="car.asp?updateQ=1&productid=<%=localcart(cartpid,i)%>"><IMG SRC="delete.gif" Border=0></a></TD> </TR> <% END IF %> <% NEXT %> </TABLE> </TD></TR> <TR> <TD Align="right"> <TABLE BORDER=1> <TR> <TD>Total:</TD> <TD>R$<%=Total%></TD> </TR> </TABLE> </TD></TR> </TABLE> <br> <INPUT TYPE="Submit" Value="Atualizar"> </FORM> <a href="default.asp">voltar</a></center>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Carlos Moreira    0

Carlos Moreira
Postado

Deixando mais claro.

 

Ele tem essas informações:

 

ASP
productid = TRIM(Request.Form("id") )
productname = TRIM(Request.Form("name") )
productprice = TRIM(Request.Form("price") )

 

Se eu quisesse assim:

 

ASP
productid = TRIM(Request.Form("id") )
productname = TRIM(Request.Form("name") )
productprice = TRIM(Request.Form("price") )
productcateg = TRIM(Request.Form("categoria") )

 

Como posso exibi-lo?

Compartilhar este post

Link para o post
Compartilhar em outros sites

NewUser    0

NewUser
Postado

Pegue o valor total no carrinho e grave um cookie e depois recupere no topo da página!

EX.:

VarTotal=Vartotal+subTotalresponse.cookie("valor")("subtotal")=subTotalresponse.cookie("valor")("total")=VarTotal

no topo da página você recupera

response.Write(request.cookie("valor")("total"))
essa é uma das formas, mais pode tbm ser usada SESSION ou Request.Querystring.

FLW!!!

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito