Ir para conteúdo

POWERED BY:

Arquivado

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

theverme

porcentagem em asp

Recommended Posts

Galera to com um pobleminha que não to conseguindo resolver.

vamos la to tentando fazer um calculo de porcentagem em asp.

A ideia é

 

juros é de 1.9 ao mes

 

taxa = valor - entrada + juros/100 * parcela

 

alguem tem alguma ideia ??

Compartilhar este post


Link para o post
Compartilhar em outros sites

<%

Porcentagem = 1.9

Valor = 5000

Parcelas = 24

 

function ValorParcelaJuroSimples(Porcentagem,Valor,Parcelas)

 

Taxa = valor * Porcentagem / 100

TotalJuros = Taxa * Parcelas

Resultado = (TotalJuros + Valor) / Parcelas

ValorParcelaJuroSimples = FormatNumber(Resultado)

end function

response.write ValorParcelaJuroSimples(Porcentagem,Valor,Parcelas)

%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

é apenas fórmula matemática, e depois formatar com FormatPercent,a função FormatPercent retorna uma expressão formatada como uma porcentagem (multiplicada por 100) com um caracter à direita %

 

 

a = 0
i = 0
b = 0
While not rs.eof

if rs("numero") = "1" then
a = a + 1
end if
if rs("numero") = "" then
b = b + 1
end if

i = i + 0

rs.MoveNext
Wend

Response.Write("O total de registros com o numero 1 é de: " & a & "<br>")
per_1 = (i/100) * a
Response.Write("O PERCENTUAL de registros com o numero 1 é de: " & per_1 & "%<br>")
per_0 = (i/100) * b
Response.Write("O total de registros com o numero 0 é de: " & b & "<br>")
Response.Write("O PERCENTUAL de registros com o numero 0 é de: " & per_0 & "%<br>")

Compartilhar este post


Link para o post
Compartilhar em outros sites

galera da uma avaliada no script que fiz e se da para melhorar.

 

 

juros.asp

------------------------------------------------------------------

<form action="juros2.asp" method="post">
  <table width="50%" border="0" cellspacing="2" cellpadding="0">
    <tr>
      <td width="37%">Valor</td>
      <td width="63%"><input name="valor" type="hidden" id="valor" value="38.040,00">
        38.040,00</td>
    </tr>
    <tr>
      <td>Entrada</td>
      <td><input name="entrada" type="text" id="entrada"></td>
    </tr>
    <tr>
      <td>Parcela</td>
      <td><select name="parcelas" id="parcelas">
	  
	 <option value="0"></option>
	 	 <option value="12">12</option>
		 	 <option value="24">24</option>
			 	 <option value="36">36</option>
				 	 <option value="48">48</option>
					 	 <option value="60">60</option>
					 	   <option value="72">72</option>





        </select></td>
    </tr>
    <tr>
      <td> </td>
      <td><input type="submit" name="Submit" value="ok"></td>
    </tr>
  </table>
</form>

juros2.asp

--------------------------------------------------------------------

 

<%
valor = request.Form("valor")
entrada = request.Form("entrada")
parcelas = request.Form("parcelas")
juros = "00.9" 'juros ao mes
taxa2 = (valor * juros/100 + valor)'valor com juros
taxa3 = (taxa2 - entrada)'valor com juros - entrada
total = (taxa3 / parcelas)'valor com juros - entrada / parcelas
juros2 = (valor + juros * parcelas)


%>
<html>
<head>
<title>Documento sem título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
valor = 38.040,00 <br>
valor com juros de <%=juros%> a.m = <%=FormatCurrency(taxa2)%><br>
valor com juros - entrada de <%=entrada%> = <%=FormatCurrency(taxa3)%>
<br>
valor com juros - entrada de <%=entrada%> em <%=parcelas%>x = <%=FormatCurrency(total)%>
<br>
<br>
<br>
<%=FormatNumber(juros2)%>
</body>
</html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Sim, declare as variaveis

 

Dim valor, entrada, parcelas, juros, taxa2, taxa3, taxa1, juros2

valor = request.Form("valor")
entrada = request.Form("entrada")
parcelas = request.Form("parcelas")
juros = "00.9" 'juros ao mes
taxa2 = (valor * juros/100 + valor)'valor com juros
taxa3 = (taxa2 - entrada)'valor com juros - entrada
total = (taxa3 / parcelas)'valor com juros - entrada / parcelas
juros2 = (valor + juros * parcelas)

e não precise colocar "" em conteúdos de variaveis que forem formados por número

 

juros = 00.9

Compartilhar este post


Link para o post
Compartilhar em outros sites

<%
dim valor, entrada, parcelas, juros, taxa, taxa2, total
valor = request.Form("valor")
entrada = request.Form("entrada")
if entrada = "" then 
entrada = 0
end if
parcelas = request.Form("parcelas")

juros = 1.3' juros ao mes
taxa = (valor - entrada)'valor - entrada
taxa2 = (taxa + juros/100 + taxa)'valor com juros
total = (taxa2 / parcelas) 'valor com juros divido por parcelas
%>
Bom fiz assim galera

 

a ideia é

 

pagar o valor - entrada, depois adicionar o juros de 1.3 ao mes, dividir esse valor com juros pelo nº de parcelas, assim obtendo o valor final da parcela.

 

bom galera na calculadora o resultado é igual, porem quando eu faço uma simulação em outro site ele me retorna um valor diferente pq sera ?? sera que o meu codigo esta errado ????

Compartilhar este post


Link para o post
Compartilhar em outros sites

somente neste site, ou em outros computadores também....

Compartilhar este post


Link para o post
Compartilhar em outros sites

tente aquele code que passei acima, para ver se apresenta a mesma coisa em todos os micros...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.