Ir para conteúdo

POWERED BY:

Arquivado

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

kika

Somatório de valores em ASP ou JavaScript

Por , em ASP Clássico

Recommended Posts

kika    0

kika
Postado

Tenho uma página em ASP com uma tabela de Tamanhos de roupas (P/M/G) e gostaria que meus usuários digitassem a quantidade ao lado de cada tamanho. Estou fazendo como se fosse um formulário, com envio dos dados pelo CDonts, gostaria de saber como calcular o total dessas quantidades sem usar BD.

É possível isso?

 

http://forum.imasters.com.br/public/style_emoticons/default/ermm.gif

Compartilhar este post

Link para o post
Compartilhar em outros sites

Marcelo Barcellos    0

Marcelo Barcellos
Postado

Exemplo

 

<script Language="vbScript">Sub Calcular()qtde_p = document.nome_do_form.nome_do_campo.valueqtde_m =document.nome_do_form.nome_do_campo.valueqtde_g =document.nome_do_form.nome_do_campo.valueTotal = Ccur(qtde_p) + Ccur(qtde_m) + Ccur(qtde_g)Msgbox TotalEnd Sub</Script>

Compartilhar este post

Link para o post
Compartilhar em outros sites

kika    0

kika
Postado 

<%@ Language=VBScript %><html><head><title>Teste</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><script language="JavaScript" type="text/JavaScript"><!--function MM_reloadPage(init) {  //reloads the window if Nav4 resized  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();}MM_reloadPage(true);function verifica() {  if (document.forms[0].email.value.length == 0) {    alert('Por favor, preencha o E-mail');    return false;  }    if (document.forms[0].TamanhoP.value.length == 0) {    alert('Por favor, preencha a Quantidade');    return false;  }    if (document.forms[0].TamanhoM.value.length == 0) {    alert('Por favor, preencha a Quantidade');    return false;  }     if (document.forms[0].TamanhoG.value.length == 0) {    alert('Por favor, preencha a Quantidade');    return false;  }   return true;}//--></script><script Language="vbScript">Sub Calcular()TamanhoP = document.form1.TamanhoP.valueTamanhoM = document.form1.TamanhoM.valueTamanhoG = document.form1.TamanhoG.valueTotal = Ccur(TamanhoP) + Ccur(TamanhoM) + Ccur(TamanhoG)Msgbox TotalEnd Sub</script></head><body><form method="post" name="form1" onSubmit="return (verifica())">  <table width="76%" border="0" cellspacing="0" cellpadding="0">    <tr>       <td> </td>      <td> </td>      <td><div align="center"><font face="Arial, Helvetica, sans-serif"><strong><em><font color="#333333">E-mail :</font></em></strong><br>          </font>           <input name="email" type="text" size="25">          <br>          <br>          <font face="Arial, Helvetica, sans-serif"><br>          </font> </div></td>    </tr>    <tr>       <td> </td>      <td> </td>      <td> </td>    </tr>    <tr>       <td width="64%" valign="top"><img src="foto.jpg" width="500" height="389" border="1"></td>      <td width="4%"> </td>      <td width="32%" valign="middle"> <table width="63%" border="1" align="center" cellspacing="1" bordercolor="#993333" id="Página1">          <tr bgcolor="#FFFFCC">             <td colspan="2"> <div align="center"><strong><font color="#333333" size="2" face="Verdana, Arial, Helvetica, sans-serif">                 <br>                </font></strong></div></td>          </tr>          <tr>             <td width="50%"><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Tamanhos</strong></font></div></td>            <td width="50%"><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Quantidade<br>                da Peça</strong></font></div></td>          </tr>          <tr>             <td><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">P</font></div></td>            <td><div align="center"><font face="Typist">                 <input name="TamanhoP" type="text" id="TamanhoP" size="5">                </font></div></td>          </tr>          <tr>             <td><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">M</font></div></td>            <td><div align="center"><font face="Typist">                 <input name="TamanhoM" type="text" id="TamanhoM" size="5">                </font></div></td>          </tr>          <tr>             <td><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">G</font></div></td>            <td><div align="center"><font face="Typist">                 <input name="TamanhoG" type="text" id="TamanhoG" size="5">                </font></div></td>          </tr>        </table> <div align="center"><br>          <input name="enviar" type="submit" id="enviar" value="Enviar Pedido">        </div></td>    </tr>    <tr>       <td> </td>      <td> </td>      <td> </td>    </tr>  </table>      </form>  <%Set Mailer = Server.CreateObject("CDONTS.NewMail")Mailer.From = request("email")Mailer.To = "email@provedor.com.br"Mailer.CC = request("email")Mailer.bodyFormat = 1Mailer.mailFormat = cdoMailFormatTextMailer.Subject = "TESTE "Texto1 = "E-mail : " & Request("email") & vbcrlf & vbcrlf & "TamanhoP = " & Request("TamanhoP") & vbcrlf & "TamanhoM = " & Request("TamanhoM") & vbcrlf & "TamanhoG = " & Request("TamanhoG") Mailer.Body = Texto1 Mailer.SendSet Mailer = Nothing%>  </body></html>

Meu código está assim

Compartilhar este post

Link para o post
Compartilhar em outros sites

kika    0

kika
Postado

Não estou sabendo onde colocar a chamada

Compartilhar este post

Link para o post
Compartilhar em outros sites

kika    0

kika
Postado

Agora funcionou...obrigada, mas deixa eu te perguntar mais uma coisa, tem como colocar esse total dentro de uma caixa de texto ao invés de exibir aquela caixa de mensagem na tela?

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