Ir para conteúdo

POWERED BY:

Arquivado

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

SkyleShady

Calculando juros

Por , em ASP Clássico

Recommended Posts

SkyleShady    0

SkyleShady
Postado

Como resolver isso? Quero que ele pegue o valor do formulario e veja se está entre os valores e se tiver fazer a divisão desse valor e exibir o resultado chamando a mesma pagina e exibindo o resultadota tudo certo so to preso nessa resolução dos valores pra fazer o calculo referente ao valor

 

<%
Dim valor,soma,total  'Aqui estão as variáveis usadas

'Aqui ele vai buscar as variáveis do formulário através do request.form

valor=request.form("valor")           
soma= if valor = (>=0) and (<=1500) then
valor/0,1


elseif valor2 = (>=1501) and (<=3000) then
valor2/0,2


else valor3 = (>3001) then
valor3/0.3

end if

%>
<title>Calcular o Juros</title><body bgcolor="#006699" text="#FFFFFF"><FORM NAME="cadastro" METHOD="POST" ACTION="calculo.asp"
   onsubmit="return(checkForm(this))">
  <table width="749" border="0" cellpadding="0" cellspacing="0">
    <!--DWLayoutTable-->
    <tr> 
      <td height="88" colspan="4" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
          <!--DWLayoutTable-->
          <tr> 
            <td width="749" height="88" valign="top"><div align="center"> 
                <p><strong><font color="#000000" size="4" face="Courier New, Courier, mono">Cálculo de Porcentagem</font></strong></p>
                </div></td>
          </tr>
        </table></td>
    </tr>
    <tr> 
      <td width="177" height="18"></td>
      <td width="151"></td>
      <td width="157"></td>
      <td width="264"></td>
    </tr>
    <tr> 
      <td height="60"></td>
      <td rowspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
          <!--DWLayoutTable-->
          <tr> 
            <td width="52" height="9"></td>
            <td width="96"></td>
            <td width="2"></td>
          </tr>
          <tr> 
            <td height="19"></td>
            <td valign="top"><font color="#FFFFFF" size="2" face="Courier New, Courier, mono">Valor</font></td>
            <td> </td>
          </tr>
          <tr> 
            <td height="2"></td>
            <td></td>
            <td></td>
          </tr>
          <tr> 
            <td height="19"></td>
            <td valign="top"><!--DWLayoutEmptyCell--> </td>
            <td></td>
          </tr>
          <tr> 
            <td height="3"></td>
            <td></td>
            <td></td>
          </tr>
          <tr> 
            <td height="14"></td>
            <td></td>
            <td></td>
          </tr>
      </table></td>
      <td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
          <!--DWLayoutTable-->
          <tr> 
            <td width="157" height="20" valign="top"><input name="valor" type="text" id="valor"></td>
          </tr>
          <tr> 
            <td height="19" valign="top"><!--DWLayoutEmptyCell--> </td>
          </tr>
          <tr> 
            <td height="19" valign="top"><!--DWLayoutEmptyCell--> </td>
          </tr>
        </table></td>
      <td> </td>
    </tr>
    <tr> 
      <td height="25"></td>
      <td></td>
      <td></td>
    </tr>
    <tr> 
      <td height="23"></td>
      <td colspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
          <!--DWLayoutTable-->
          <tr> 
            <td width="146" height="23"> </td>
            <td width="162" valign="top"><div align="center"> 
                <input type="reset" name="Reset" value="Limpar">
                <input type="submit" name="Submit2" value="Calcular">
              </div></td>
          </tr>
        </table></td>
      <td></td>
    </tr>
    <tr> 
      <td height="27" colspan="4" valign="top"><div align="center">
          <p> </p>
          <p><font size="2" face="Courier New, Courier, mono">O Juros é de R$ <b><%=soma%></b>.</font></p>
        </div></td>
    </tr>
  </table>
</form>
<div align="center">
  <p>
    <script language="JavaScript">
<!--
   function checkForm(form)
   {
      if( form.valor.value == "" ) {
         alert("Digite um Valor!");
         form.valor.focus();
         return(false);
      }
      return(true); // Se tudo certo então envia
   }
-->
</script>
  </p>
  <p> </p>
  <p> </p>
  <p> </p>
</div>

 

ALGM TEM UMA LUZ PRA MIN?

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