Ir para conteúdo

POWERED BY:

Arquivado

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

caioosman

Perdido na lógica e nos cálculos

Por , em ASP Clássico

Recommended Posts

caioosman    0

caioosman
Postado

Olá a todos!

 

To desenvolvendo um sistema de solicitação de pedidos no http://www.vitrovita.com.br/pedidos.asp

Login: caioosman

Senha: 123

 

Todos os produtos que estão lá estão interligados em um mdb com uma tabela produtos, e possuem ID, descrição e preço (definido como número).

 

Na hora que a pessoa loga no sistema, aparece uma listagem de todos produtos cadastrados, com respectivo valor e um campo pra ela definir quantidades.

 

Eu gostaria que quando ela clicasse em confirmar pedido, aparecesse a mesma listagem porém calculando os valores de cada produto (em relação as quantidades) e o valor total. Aí quando ela desse ok, esses dados serem enviados para o e-mail de meu cliente.

 

Como que eu faço, dentro dessa lógica, para calcular os valores e definir isso em algum tipo de campo, para conseguir enviar?

 

pedidos_efetuar.asp

<!--#include file="pedidos_security.asp" --><!-- #INCLUDE FILE="includes/common.asp" --><%dim oPageset oPage = New Page%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /><title>Vitrovita - Instituto de Inovação em Vitrocerâmicos</title><script src="Scripts/AC_RunActiveContent.js" type="text/javascript"></script><script src="Scripts/mascara.js" type="text/javascript"></script><link href="estilo.css" rel="stylesheet" type="text/css" /></head><body><div id="Site">  <div id="Cx_busca">	<table width="186" border="0" cellspacing="0" cellpadding="0">	  <form action='default2.asp?active_page_id=73' method="post" id="frmSearch" onsubmit="procSearch(); return false">		<tr>		  <td width="58"><label >Pesquisar:</label></td>		  <td width="97"><input type="text" class="txt" name="q" /></td>		  <td width="26"><input type="image" align="absmiddle" src="layout/botton.gif" height="25" width="25" name="btnG" alt="Procurar" style="margin-left:4px;"/></td>		</tr> </form>	</table>    </div>  <div id="Topo"><script type="text/javascript">AC_FL_RunContent( 'codebase','http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0','width','766','height','185','src','topo','quality','high','pluginspage','http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash','movie','topo' ); //end AC code</script><noscript><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="766" height="185">	  <param name="movie" value="topo.swf" />	  <param name="quality" value="high" />	  <embed src="topo.swf" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="766" height="185"></embed>	</object>  </noscript>  </div><div id="Breadcumb"><a href='default.asp?active_page_id=1'>Página inicial</a> <img src='layout/marc.gif' width='8' height='8' align='absmiddle' /> Pedidos	<br />	<span class="espacamento"> </span><br />	<span class=title>Pedidos</span></div>  <div id="Conteudo">			<div id="Cont_int">		<p>Seja bem-vindo(a) <b><%= rsCheckUser("responsavel") %>.</b></p>		<p><strong>Efetuar pedido</strong><b> | <a href="pedidos_editar.asp?.rand=<%= md5Hash %>">Editar Conta</a> | <a href="pedidos_logout.asp?.rand=<%=md5Hash %>">Sair do sistema </a></b></p>		<table width="515" border="0" cellspacing="1" cellpadding="3"><form METHOD="POST" action="pedidos_confirmacao.asp?.rand=<%= md5Hash %>" name="validacao">		<tr>	<td width="816" align="left" bgcolor="#e4e4e4">	  <strong> Produto</strong></td>	<td width="122" bgcolor="#e4e4e4"><strong> Preço </strong></td>	<td width="52" bgcolor="#e4e4e4"><strong> Quantidade</strong></td>  </tr><%			  n_page=request("n_page")If n_page="" Then n_page = 1set cn = server.CreateObject("ADODB.Connection")cn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:\inetpub\vhosts\vitrovita.com.br\private\users.mdb;"Set rs=Server.CreateObject("ADODB.Recordset")rs.Open "SELECT * FROM produtos ORDER BY produto ASC", cn, 3,3IF rs.EOF then  Response.Write "Nenhum produto cadastrado." Response.End 'paramos o programaELSErs.PageSize = 100 'registros por páginars.AbsolutePage = Cint(n_page)contador=0do While not rs.EOF AND contador < rs.PageSizecontador=contador+1		If Eval(contador\2 = contador/2) Then		  color = "#e4e4e4"		ELSE		  color = "#f8f8f8"		END IF %>			  <tr>	<td width="816" align="left" bgcolor="<%= color %>">   <%= rs("produto") %></td><td width="122" bgcolor="<%= color %>"> R$ <%= rs("preco") %></td><td width="52" bgcolor="<%= color %>"> <input name="<%= rs("id") %>qtd" id="<%= rs("id") %>qtd" type="text" size="2" maxlength="3" onkeypress="return txtBoxFormat(document.validacao, '<%= rs("id") %>qtd', '999', event);"/></td>  </tr>				  <% rs.movenextloop%> <td width="816" align="left" bgcolor="#f8f8f8" colspan="3"> <strong>Observações (medidas sob encomenda, detalhes ou outros detalhes)</strong><br /><textarea name="" cols="" rows="" style="width:505px; height:80px;"></textarea></td></tr><tr><td width="816" align="left" bgcolor="#f8f8f8" colspan="3"><input  name="submit" type="submit"  value="		Calcular pedido		" style="font-weight:bold; height:22px; color:#ffffff;"/></td></tr>		</form></table><%end ifrs.closeset rs = nothing%></div></div>	<div id="Rodape"><span class="linhapeq"><img src="layout/linha.gif" width="745" height="1" /><br />	 </span><a href="default2.asp?active_page_id=146"><br /></a><a href="default2.asp?active_page_id=146">A Empresa</a>  |  <a href="default2.asp?active_page_id=147">Produtos</a>  |  <a href="default2.asp?active_page_id=148">Serviços</a>  |  <a href="pedidos.asp">Pedidos</a>  |  <a href="default2.asp?active_page_id=150">Artigos</a>  |  <a href="default2.asp?active_page_id=151">Fale conosco</a><br />	<span class="style1"> </span><br />Endereço: Rua Alfredo Lopes, 1717 - Sala E12 - Vila Elizabeth - CEP 13560-460 - São Carlos - SP - Tel: (16) 3351.8796<br /><span class="style1"> </span><br class="linhapeq" /><span class="txtaudax">Copyright © 2004 - 2007 - Desenvolvido por <a href="http://www.audaxweb.com.br" title="Audax - Desenvolvimento de sites">Audax</a></span></div></div></body></html><%set oPage = nothingSet adoCon = NothingSet strCon = NothingSet rsCheckUser = Nothing%>

Obrigado pela atenção.

 

Abraços.

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Os valores TOTAIS serão gravados em algum campo do BD com os pedidos?

 

Isso pode ser feito via JavaScript, com os totais sendo gravados em campos html tipo Hidden e exibidos em DIV's.

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