Calculo De Juros Compostos

[Marcos-rj]

Bom galera, p/ quem precisa. segue ai o exemplo p/ calculo de juros compostos.

é so colocar o valor, nº de pacelas, nº de parcelas com juros e o juros a.m.

já montei numa tabela, so copiar e colar.

<%
'calcula o valor de cada parcela, e em quantas vezes o produto poderá ser parcelado e com quantas parcelas
'possui juros, e quantas não possui.
x = "2.550,00" 'Valor do Produto
y = "12" 'Nº total de Parcelas
cjuros = "0,05" 'Juros Cobrado a.m
juros = "6" -1 +1 'Nº de Parcela C/ Juros
%>
<table border="0" width="200"cellspacing="1" cellpadding="0" bgcolor="#F2F2F2">
    <tr>
        <td width="197" align="center" colspan="3">
        <p align="left"><b><font face="Verdana" size="2">Parcelamento</font></b></td>
    </tr>
<%
For i = 1 To y
If (i-1) = Round(y/2,0) Then
End If
%>
    <tr>
        <td width="38"><font face="Verdana" size="2"><%=i%> x</font></td>
        <td width="90"><font face="Verdana" size="2"><%If juros > i Or juros = 0 Then valor = FormatCurrency(Round(x/i,1),2) else valor = FormatCurrency(x * (cjuros * (1+cjuros)^ i) / ((1+cjuros)^ i -1))%><%=valor%></font></td>
        <td width="67"><font face="Verdana" size="2"><%If juros > i Or juros = 0 Then juro = "sem juros" Else juro = "<font color='#FF0000'>com juros</font>"%><%=juro%></font></td>
    </tr>
<%Next%>
</table>