Contagem de PRODUTOS

[marcelocardoso 6]

OLÁ PESSOAL

 

 

Estou tentando incrementar um pequeno código de carrinho que achei na net, e não estou conseguindo fazer como muitas lojas que tem por aí, que sempre na primeira tela tem logo no topo, a QUANTIDADE DE PRODUTOS EXISTENTES NA CESTA, ok

 

Como é que posso fazer isto?

Pois tenho no código do carrinho um LAÇO com DO WHILE , e tenho um campo INPUT onde diz a quantidade dos produtos adquiridos, ok

 

ENTÂO:

Como é que posso fazer uma página para pegar e somar todos os produtos que foram colocados no carrinho, e nesta página me mostrar a quantidade REAL de produtos que tem na CESTA????

 

 

Alguém pode me ajudar?

A variavel que é responsável por pegar a quantidade de produtos, é QuantDoProduto

 

 

 

:natalsmile: Obrigado A TODOS

[Mário Monteiro 179]

eu costumo usar DB... alguns defendem outras formas de armazenamento ...

[ultra 0]

marmmc você tem q falar a forma de armazenamento da quantidade... eu acho q deve ser por array, pois a maioria dos códigos prontos na internet de lojas virtuais usam assimo danilo.max mostrou no caso da cesta de compras for em BD

[marcelocardoso 6]

Beleza PESSOAL!

 

 

Quero agradecer pela ajuda de todos, valeu mesmo....

Mas tenho mais uma dúvida?

E se o IDCLIENTE, estiver em outra tabela, como faço a instrução SQL abaixo?????

 

SELEC count(CAMPO_PRACONTAR) As Total FROM SUATABELA WHERE idCliente = '" & idCliente & "'

 

 

Obrigado.

[mx loco 1]

qual seria o campo de relacionamento da tabala de produtos e tabela de cliente, pois para unir ambas você precisaria de relacionar atraves de um campo nas tabelas.

[marcelocardoso 6]

Seria o CAMPO UserIDNum na tabela senhas

 

 

Até mais

[marcelocardoso 6]

PESSOAL MEU BANCO DE DADOS ONDE GRAVA OS DADOS É ASSIM:

 

 

Chama-se a tabela de: SHOPPING

E a estrutura da tabela esta assim:

 

ID === CodigoDoPedido === CodigoDoProduto === QuantidadeDoPedido

______________________________________________________________

 

1 ======== 1 ============= 50 ============== 10

2 ======== 1 ============= 59 ============== 2

3 ======== 2 ============= 10 ============== 25

 

______________________________________________________________

 

Notem que no pedido de ID 1 tem dois produtos com o mesmo código do pedido de numero 1, então logo teria que pegar a quantidade do ID 1 e 2, que tem o mesmo CodigoDoPedido com o nº 1 e soma-los, ....ok ----

 

Como eu poderia fazer isto????

Pois gostaria que no momento, só me somasse através do CodigoDoPedido a quantidade de pedidos pelo campo QuantidadeDoPedido.

 

 

Podem me ajudar com esta instrução????

Obrigado!.

[marcelocardoso 6]

.......HEI Alguém consegue me AJUDAR??????????????????Obrigado!!!!

[Matheusao 0]

Acho que pode usarquery = "SELECT DISTINCT ID,QuantidadeDoPedido FROM SHOPPPING"rs.Count te retorna a quantidade de registros, não a soma dos campos.

[marcelocardoso 6]

Olá PESSOAL!

Tô precisando mesmo de ajuda dos colegas, pois ainda não conseguir chegar em um veredito real e verdadeiro neste caso: vejam só... como tentei fazer, mas não tive exito:

 

<% IF SESSION("CodigoDaVenda") = "" THEN		Response.Write ""   ELSE   SET Soma = Server.CreateObject("ADODB.RECORDSET")	   Soma.Open "SELECT Count(QuantidadeDoPedido) AS MAXTOTAL FROM Shopping_ComprasPedidosItens WHERE CodigoDoPedido = " & Session("CodigoDaVenda"), Conexao	   TotalDaSoma = Soma			Response.Write TotalDaSomaEND IF%>

ERRO QUE ME DÁ:

Objeto Response error 'ASP 0185 : 8002000e'

Propriedade padrão ausente ?

Não foi localizada uma propriedade padrão para o objeto.

 

 

 

Tentei fazer com este IF, mas não sei se a minha lógica está certa.

[marcelocardoso 6]

Olá Galera!

 

Será que alguém aí do forum que é fera em Lojas Virtuais, consegue me ajudar a resolver este problema, pois eu não estou sabendo resolver...???

 

Estou querendo somar os campos já descritos acima anteriormente, mas não conseguir com o COUNT... Tentei fazer uma comparação com o IF, mas também não obtive exito.

Portanto recorro aos colegas???

 

 

Obrigado!

Aguardo retorno se possível....

[ultra 0]

marmmc seu código está errado... a linha Soma.Open deve ser seguida dos dados de conexão com seu BD, e não da SQL

 

A SQL de soma seria assim:

 

"SELECT Sum(QuantidadeDoPedido) AS MAXTOTAL FROM Shopping_ComprasPedidosItens WHERE CodigoDoPedido = " & Session("CodigoDaVenda")

 

Isso pega a quantidade dos registros e soma

 

Espero ter ajudado

[marcelocardoso 6]

ULTRA!

 

Beleza mesmo, tudo de bom...

 

POR FAVOR, ME ILUMINE MAIS UM POUCO NESTA COLEGA???

Gostaria de acrescentar junto ao código, uma verificação, logo aqui em baixo:

 

IF SESSION("CodigoDaVenda") = "" THEN

Response.Write "0"

 

Gostaria de acrescentar nesta parte do código acima, alguma coisa para que o codigo também reconhece e verificasse, caso a SESSION CodigoDaVenda não existesse ainda, aí ele tambem colocasse o "0" do response.write, certo.

 

TEM COMO???

 

 

 

 

Tudo de BOM a TODOS! :natalbiggrin:

[marcelocardoso 6]

Alguém consegue me ajudar, por gentileza???

 

Pois quero saber se a SESSION existe, ou não no servidor? pois caso não exista no server, gostaria que também me retornasse o número 0.

 

 

Obrigado!

[Mário Monteiro 179]

só pergunta se seu valor é vazio ou não

 

IF ISNULL(SESSION("CodigoDaVenda")) OR ISEMPTY(SESSION("CodigoDaVenda")) THENResponse.Write "0"END IF

[marcelocardoso 6]

Olá MARIO e COLEGAS!

 

Mario obrigado pela ajuda, mas coloquei o seu código mas ainda não resolvi este problema. olhe só:

Tenho agora este código abaixo, conforme você indicou:

<%

'IF SESSION("CodigoDaVenda") = "" THEN

IF ISNULL(SESSION("CodigoDaVenda")) OR ISEMPTY(SESSION("CodigoDaVenda")) THEN

Response.Write "0"

 

ELSE

 

SET Soma = Server.CreateObject("ADODB.RECORDSET")

Soma.Open "SELECT SUM (QuantidadeDoPedido) AS MAXTOTAL FROM Compras WHERE CodigoDoPedido = " & Session("CodigoDaVenda"), Conexao

Response.Write Soma(0)

END IF

%>

Mas ainda me dá o mesmo problema, se não existe a SESSION ele não me coloca o 0

 

 

Aqui tenho o código, onde é colocado na página do carrinho, que serve para excluir as compras, e assim que executo este arquivo abaixo, o primeiro código acima não reconhece que foi destruido a session CodigoDaVenda e não me coloca o valor ZERO....ok?

 

<!--#include file="incl/incl_conexao.asp"-->

<%

'Exclui todos os produtos selecionados no carrinho

SQL = "DELETE FROM Compras WHERE CodigoDoPedido = " & Session("CodigoDaVenda")

SET Del = Conexao.Execute(SQL)

 

SET Del = Nothing

Conexao.Close

SET Conexao = Nothing

 

'Redirecionamos para a página do carrinho

Response.Redirect "carrinho.asp"

%>

PODEM ME AJUDAR A RESOLVER, POIS ACHO QUE FALTA COISA MINIMA.???

Obrigado a todos.

[Mário Monteiro 179]

vamos tentar diferente entãoeste codigo ai é numerico???se for tente assimem vez de IF ISNULL(SESSION("CodigoDaVenda")) OR ISEMPTY(SESSION("CodigoDaVenda")) THENfaçaIF ISNUMERIC(SESSION("CodigoDaVenda")) THEN

[marcelocardoso 6]

Olá MARIO!

 

Muito Obrigado, funcionou....

Mas agora está só aparecendo o número de valor "0"

Pois ele não está somando quando coloco os produtos no carrinho de compras...?

Oque pode ser agora!

 

Pois agora está fazendo oque eu queria que fizesse, mas em compensação não está mais somando mais cada vez que coloco um produto na lista, mas sempre me coloca o ZERO...

 

Podes me AJUDAR!

Obrigado...

[Mário Monteiro 179]

na verdade faltou um NOT alitente assimIF NOT ISNUMERIC(SESSION("CodigoDaVenda")) THEN

[marcelocardoso 6]

PREZADO MÁRIO!

 

Fiz oque você me passou, mas agora o danado quando uso aquela instrução passada anteriormente por mim, para deletar os produtos da cesta realizada por SESSION("CodigoDaVenda").

 

Ele não me coloca o ZERO, mas me deixa vazio.... como no começo do tópico..

Estou usando este código abaixo agora, conforme você me passou:::

<%

'Verificaremos se a cesta de produtos contém algum produto em vista ou não

'E logo iremos montar a cesta do topo do cabeçalho do site.

IF NOT IsNumeric(Session("CodigoDaVenda")) OR IsEmpty(Session("CodigoDaVenda")) THEN

Response.Write "0"

ELSE

SET SomaQuantidade = Server.CreateObject("ADODB.RECORDSET")

SomaQuantidade.Open "SELECT SUM(QuantidadeDoPedido) AS MAXTOTAL FROM Shopping_Compras WHERE CodigoDoPedido = " & Session("CodigoDaVenda"), Conexao

Response.Write SomaQuantidade(0)

END IF

'Terminamos aqui!

'A verificação da cesta de produtos.

%>

Sei que tem uma solução para realizar isto, mas como??? eu ainda não sei....

E se o colega puder me ajudar, pois meus conhecimentos de asp, ainda não chegaram lá.....

 

 

Obrigado.

Boas FESTAS