Ir para conteúdo
Fórum Script Brasil
  • 0

Inserindo Quantidade De Produto

mulderx

Perguntado por mulderx,

 Share

Pergunta

mulderx

mulderx

Postado
Postado

Olá pessoal!

Tenho aqui uma duvida de um cliente meu, que me pediu pra colocar um form na tela de produtos, ... nesse form ele digita a quantidade que ele quer desse determinado produto, (figura 1)

user posted image

aí quando ele clica em adicionar à lista, ele adiciona o produto já com a quantidade que ele determinou ... tipo, a idéia é ele determinar a quantidade do produto que ele deseja, sem a necessidade de ele editar na tela da lista (figura 2) ...

user posted image

Esse sistema foi montado com session ... tem como fazer isso q eu disse???

Link para o comentário
Compartilhar em outros sites

9 respostass a esta questão

Posts Recomendados

  • 0
mulderx

mulderx

Postado
  • Autor
Postado

humm .. poderias me mostrar como se faz isso? vou te mandar o código das minhas páginas pra você analisar .. já estou nesse sistema há 2 meses, já estou me perdendo fácil nesse monte de códigos! hehe

arquivo CATEGORIAS

<!--#include file="../conexao.asp" -->
<%if Session("AcessoRestrito") = TRUE then %>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../estilo_repres.css" rel="stylesheet" type="text/css">
</head>
<%
NomedoProduto = request.QueryString("NomeProduto")
CordoProduto = request.QueryString("Cor")
sql_produtos = "SELECT * FROM Produtos WHERE NomeProduto = '"&NomedoProduto&"' AND Cor = '"&CordoProduto&"'"
set rs_produtos = conexao.execute(sql_produtos)
%>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0" class="arial">
  <tr>
    <td bgcolor="#FFCC00">&nbsp;</td>
    <td width="775" valign="top"><table width="100%" height="20" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFF99" class="textointerno">
        <tr> 
          <td align="right"> 
            <%
representante = request.QueryString("RepresentanteID")
sql_representantes = "SELECT * FROM Representantes WHERE RepresentanteID="&representante&""
set rs_representante = conexao.execute(sql_representantes)
%>
            Representante: <font color="#CC0000"><strong><%=rs_representante("NomeRepresentante")%>&nbsp;&nbsp;&nbsp;&nbsp;</strong></font></td>
        </tr>
      </table>
<table width="100%" border="0" cellpadding="12" cellspacing="0" class="textointerno">
        <tr> 
          <td height="235" valign="top"> <table width="100%" border="0" cellpadding="0" cellspacing="0" class="textointerno">
              <tr> 
                <td valign="top"><strong>Unidades de Medida do Produto: </strong> 
                  <font color="#FF0000"><strong><%=rs_produtos.fields("NomeProduto")%> - <%=rs_produtos.fields("Cor")%></strong></font><br>
                  Se voc&ecirc; deseja adquirir algum produto dessa lista, clique 
                  no bot&atilde;o &quot;<strong>Adicionar &agrave; Lista</strong>&quot; 
                  do produto escolhido.<br> <br>
                </td>
              </tr>
            </table>
            <br> 
            
            <table width='100%' border='0' cellpadding='0' cellspacing='1' bgcolor='#999999' class='arial'>
<tr align='center'> 
                <td width="58" height='18' align='center' bgcolor='#FFCC00'><strong>C&oacute;digo</strong></td>
                <td height='18' align='left' bgcolor='#FFCC66'><strong>&nbsp;&nbsp;Cor 
                  do Produto</strong></td>
                <td width="117" align='center' bgcolor='#FFCC66'><strong>Unid. 
                  Medida</strong></td>
                <td align='center'>&nbsp;</td>
              </tr>
     <%
	if rs_produtos.eof then
  response.write "<font class='textopreto'>Não há nenhum produto cadastrado.</font>"
	else 
  do while not rs_produtos.eof
   %>
     
              <tr align='center'> 
                <td height='26' align='center' valign="middle" bgcolor='#E5E5E5'><%=rs_produtos("CodigoID")%></td>
                <td height='26' align='left' valign="middle" bgcolor='#E5E5E5'>&nbsp;&nbsp;<%=rs_produtos("Cor")%></td>
                <td height="26" align='center' valign="middle" bgcolor='#E5E5E5'><%=rs_produtos("UnidMedida")%></td>
                <td width="136" height="26" align='center' bgcolor='#FFFF99'><a href="preencher_produto_incluido.asp?CodigoID=<%=rs_produtos("CodigoID")%>&RepresentanteID=<%=representante%>"><img src="../imgs/botao_adicionar.gif" width="136" height="22" border="0"></a></td>
              </tr>
     <%
      	rs_produtos.movenext
  loop
	end if

   %>
     
     
            </table>
            <br> 
            
            <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0" class="arial">
<tr> 
                <td align="right" bgcolor="#FFFF99"><strong><a href="preencher_categorias.asp?RepresentanteID=<%=representante%>" class="textointerno">&lt;&lt; 
                  escolher MAIS PRODUTOS</a></strong>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<strong><a href="javascript:history.back(-1)" class="textointerno">&lt;&lt; 
                  voltar CORES</a></strong>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href="preencher_lista.asp?RepresentanteID=<%=representante%>" class="textointerno">Ver 
                  minha Lista &gt;&gt;</a>&nbsp;&nbsp;</td>
              </tr>
            </table></td>
        </tr>
      </table></td>
    <td bgcolor="#FFCC00">&nbsp;</td>
  </tr>
</table>
</body>
</html>
<%
Else
	Response.redirect("../acesso_restrito.htm")
end if
%>
arquivo de INCLUIR 
<%option explicit%>
<%if Session("AcessoRestrito") = TRUE then %>

<html>
<head>
<meta http-equiv="refresh" content="3;URL=javascript:history.back(-1)">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../estilo_repres.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0" class="arial">
  <tr>
    <td bgcolor="#FFCC00">&nbsp;</td>
    <td width="775" valign="top"><table width="100%" border="0" cellpadding="16" cellspacing="0" class="textointerno">
        <tr> 
          <td valign="top"> 
            <%
Dim CodProduto

CodProduto = request.querystring("CodigoID")

'Caso o pedido já tenha sido feito
if Session("InclProduto").Exists(CodProduto) then

	response.write "<table width='100%' border='0' cellpadding='0' cellspacing='0' class='textointerno'>"
	response.write "<tr><td align='center' valign='top'> <p><br><br><br><br><br>"
	response.write "<img src='../imgs/img_existente.gif' width='50' height='50'><br>"
	response.write "<strong><br>PRODUTO JÁ EXISTENTE</strong><br>"
	response.write "<br>O produto selecionado já se encontra em sua lista de pedidos.<br>"
	response.write "<br><br>Aguarde, redirecionando ...</td></tr></table>"

else
'Adicionando o produto no carrinho, com quantidade igual a 1
	Session("InclProduto").Add CodProduto, 1

	response.write "<table width='100%' border='0' cellpadding='0' cellspacing='0' class='textointerno'>"
	response.write "<tr><td align='center' valign='top'> <p><br><br><br><br><br>"
	response.write "<img src='../imgs/img_incluido.gif' width='50' height='50'><br>"
	response.write "<strong><br>PRODUTO INCLU&Iacute;DO COM SUCESSO!</strong><br>"
	response.write "<br>O produto selecionado acaba de ser inserido em sua lista de pedidos.<br>"
	response.write "<br><br>Aguarde, redirecionando ...</td></tr></table>"
   
end if
%>
          </td>
        </tr>
      </table></td>
    <td bgcolor="#FFCC00">&nbsp;</td>
  </tr>
</table>
</body>
</html>
<%
Else
	Response.redirect("../acesso_restrito.htm")
end if
%>
arquivo da LISTA 
<%option explicit%>
<!--#include file="../conexao.asp" -->
<%if Session("AcessoRestrito") = TRUE then %>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../estilo_repres.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0" class="arial">
  <tr>
    <td bgcolor="#FFCC00">&nbsp;</td>
    <td width="775" valign="top"> <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFF99" class="textointerno">
        <tr> 
          <td align="right"> 
            <%
Dim representante, sql_representantes, rs_representante
representante = request.QueryString("RepresentanteID")
sql_representantes = "SELECT * FROM Representantes WHERE RepresentanteID="&representante&""
set rs_representante = conexao.execute(sql_representantes)
%>
            Representante: <font color="#CC0000"><strong><%=rs_representante("NomeRepresentante")%>&nbsp;&nbsp;&nbsp;&nbsp;</strong></font></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td valign="top"> 
            <%
'Caso não haja produtos no carrinho do visitante
if Session("InclProduto").count = 0 then

	response.write "<table width='100%' border='0' cellpadding='12' cellspacing='0' class='textointerno'>"
	response.write "<tr><td valign='top'><strong>LISTA DE PRODUTOS</strong>" 
	response.write "<table width='100%' border='0' cellpadding='0' cellspacing='0' class='textointerno'>"
	response.write "<tr><td align='center' valign='top'><br><br><br><br><br>"
	response.write "<img src='../imgs/img_existente.gif' width='50' height='50'> <br><br>"
	response.write "<strong>SUA LISTA DE PEDIDOS EST&Aacute; VAZIA.</strong><br><br><br>"
	response.write "<br><br><strong>&lt;&lt; <a href='preencher_categorias.asp?RepresentanteID="&representante&"'>escolher PRODUTOS</a></strong><br></td>"
	response.write "</tr></table><br></td></tr></table>"

else 'há produtos

	response.write "<form action='preencher_atualizar.asp?RepresentanteID="&representante&"' method='post' class='campos'>"
	response.write "<table width='100%' border='0' cellspacing='0' cellpadding='12'>"
	response.write "<tr><td valign='top'>"
	response.write "<table width='100%' border='0' cellpadding='0' cellspacing='0' class='arial'>"
	response.write "<tr><td height='25' align='left' valign='top'><strong>LISTA DE PEDIDOS<br>"
	response.write "</strong><br>Segunda etapa. Est&aacute; &eacute; sua lista de pedidos at&eacute; "
	response.write "o momento. Antes de fech&aacute;-la, certifique-se da quantidade de "
	response.write "cada produto. Se voc&ecirc; deseja mudar a quantidade de algum produto, "
	response.write "redigite o valor no respectivo campo e clique em <strong>&quot;Atualizar Quantidade&quot;</strong>. "
	response.write "Se as informa&ccedil;&otilde;es estiverem corretas, clique em <strong>&quot;Preencher Dados Cadastrais&quot;</strong>:<br><br></td></tr><tr>" 
	response.write "<td height='25' align='right' bgcolor='#FFFF99'><a href='preencher_categorias.asp?RepresentanteID="&representante&"' class='textointerno'>&lt;&lt;&nbsp;" 
	response.write "escolher MAIS PRODUTOS</a>&nbsp;&nbsp; </td></tr></table>"
	response.write "<br><table width='100%' border='1' cellpadding='0' cellspacing='0' class='verdana9'>"
	response.write "<tr align='center' bgcolor='#CCCCCC'> "
	response.write "<td width='48' height='18'><strong>C&oacute;digo</strong></td>"
	response.write "<td height='18' align='left'><strong>&nbsp;&nbsp;Descri&ccedil;&atilde;o do Produto</strong></td>"
	response.write "<td width='153' height='18' align='left'><strong>&nbsp;&nbsp;Cor</strong></td>"
	response.write "<td width='44'><strong>Unid.</strong></td>"
	response.write "<td width='58' height='18'><strong>Excluir</strong></td>"
	response.write "<td width='60' height='18'><strong>Qtde</strong></td></tr>"

Dim Produto, sqlPedido, rstPedido

'aqui escrevemos o formulário em tela, de acordo com o pedido do visitante
for each Produto in Session("InclProduto")
Set rstPedido = Server.CreateObject("ADODB.RecordSet")
sqlPedido = "SELECT * FROM Produtos WHERE CodigoID = '" & Produto  & "'"
rstPedido.Open sqlPedido, conexao

'criando o formulário para manipulação dos dados

	response.write "<tr>"
	response.write "<td height='15' align='center'>"&rstPedido.fields("CodigoID")&"</td>"
	response.write "<td height='15'>&nbsp;&nbsp;"&rstPedido.fields("NomeProduto")&"</td>"
	response.write "<td height='15'>&nbsp;&nbsp;"&rstPedido.fields("Cor")&"</td>"
	response.write "<td height='15' align='center'>"&rstPedido.fields("UnidMedida")&"</td>"
	response.write "<td height='15' align='center'><a href='preencher_remover.asp?CodigoID="&rstPedido.fields("CodigoID")&"&RepresentanteID="&representante&"' class='textointerno'>Excluir</a></td>"
	response.write "<td align='center'>&nbsp;&nbsp;<input alt=Quantidade type=text size=2 name=quantidade"&Produto&" value="&Session("InclProduto").item(Produto)&"></td>"
	response.write "</tr>"
	rstPedido.Close
  next

	response.write "</table><table width='100%' border='0' cellpadding='0' cellspacing='0' class='arial'>"
	response.write "<tr><td align='right'><input name='Submit' type='submit' class='verdana9' value='Atualizar Quantidade'><br></td>"
	response.write "</tr><tr><td align='right'>"
	response.write "<table width='100%' height='20' border='0' cellpadding='0' cellspacing='0' class='arial'><tr> "
	response.write "<td class='arial'>Convenção especial para produtos:<br><br>"
	response.write "- para unidades de medida <strong>GL</strong> e <strong>GL(3,2)</strong> = caixas com <strong>4 unidades</strong>;<br>"	
	response.write "- para unidades de medida <strong>225 ml</strong> = caixas com <strong>16 unidades</strong>;<br>"	
	response.write "- para unidades de medida <strong>800 ml</strong> = caixas com <strong>8 unidades</strong>;<br>"	
	response.write "- para unidades de medida <strong>0,9 ml</strong> ou <strong>900 ml</strong> = caixas com <strong>8 unidades</strong><br><br>"	
	response.write "</td></tr></table></td></tr><tr>"
	response.write "<table width='100%' height='20' border='0' cellpadding='0' cellspacing='0' class='arial'><tr> "
	response.write "<td align='right' bgcolor='#FFFF99'><strong><a href='preencher_dados_cadastrais.asp?RepresentanteID="&representante&"' class='textointerno'>"
	response.write "PREENCHER DADOS CADASTRAIS&nbsp;&gt;&gt;</a>&nbsp;&nbsp;</td></tr></table>"
	response.write "</table></form>"

end if 
%>
          </td>
        </tr>
      </table>
    </td>
    <td bgcolor="#FFCC00">&nbsp;</td>
  </tr>
</table>
</body>
</html>
<%
Else
	Response.redirect("../acesso_restrito.htm")
end if
%>

Link para o comentário
Compartilhar em outros sites
  • 0
mulderx

mulderx

Postado
  • Autor
Postado

a organização é a seguinte:

1) o arquivo CATEGORIAS exibe os produtos, com o form da quantidade, se o cara quiser esse produto, por exemplo, ele pode alterar o valor da quantidade nesse form, e então ele clica em "adicionar"

2) o arquivo INSERIR é onde vai a programação pra ele inserir o produto, e a sua respectiva quantidade indicada no form da tela anterior.

3) o arquivo LISTA exibe os produtos da lista dele, com o valor da quantidade dentro de forms tb, pro caso de o usuário ainda querer modificar a quantidade novamente.

rolleyes.gif

Link para o comentário
Compartilhar em outros sites
  • 0
mulderx

mulderx

Postado
  • Autor
Postado

pois é gente .. realmente com session tava complicado de fazer tudo isso ... então eu montei um esquema com insert e update mesmo ... criei uma tabela no banco só pra armazenar os produtos em uma lista, com insert e update .. e agora deu tudo certo!

se quiserem o código, é só avisar aí ... do contrário, já podem fechar esse tópico!!

Valeu galera!!! rolleyes.gif

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...