...

View Full Version : month loan payment calculation script in ASP - same window - results



lse123
12-07-2007, 09:53 PM
I make a month loan payment calculation script in ASP , but I want results appear below the form not in a new window screen , what to do ? How I include a file in asp ? I must have only one file ?

tell me for results get deleted and reappear new or results appear between form and last results for subsequent submissions ...?

form can be found at : http://www.kolectivavillas.com/paphos-land/calc/loan_calc.htm

html doc


<HTML>
<HEAD>

<TITLE>Monthly Payment</TITLE>
</HEAD>

<BODY>
<H1 align="center">Monthly Loan Payment Calculation</H1>
<P ALIGN=center>This application calculates monthly payment options for <br>
a loan
based on the amount borrowed and an interest rate.<table width="400" align="center">
<tr><td width="434"><FORM ACTION="MonthlyPayments.asp" METHOD=POST>
<TABLE WIDTH=94% ALIGN=center BORDER=1 CELLSPACING=1 CELLPADDING=1>
<TR>
<TD width="199">&nbsp;</TD>
<TD width="192">&nbsp;</TD>
</TR>
<TR>
<TD>Amount to Borrow(CY&pound;):</TD>
<TD><input type="text" name=txtLoanLow size=15></TD>
</TR>
<TR>
<TD>Annual Interest Rate(%):</TD>
<TD><INPUT TYPE="text" NAME=txtRateLow SIZE=10>
</TD>
</TR>
<TR>
<TD>Number of Years:</TD>
<TD><INPUT TYPE="text" NAME=txtYears SIZE=10></TD></TR>
<TR>
<TD COLSPAN=2 ALIGN=center>
<INPUT TYPE="submit" VALUE="Submit">
<INPUT TYPE="reset" VALUE="Reset">
</TD></TR>
</TABLE>
</FORM></td></tr></table>

<p>&nbsp;</p>
</BODY>
</HTML>


asp doc

<% option explicit
dim dblLoanLow, dblRateLow, dblYears
dim dblRateLow1
dim dblPayment, dblMonthlyRate, dblMonths
dim intErrCnt

intErrCnt = 0 %>
<HTML>
<HEAD>
<TITLE>MonthlyPayments.asp</TITLE>
<style type="text/css">
<!--
.style2 {
font-family: Arial, Helvetica, sans-serif;
font-weight: bold;
}
.style3 {
color: #FF0000;
font-family: Arial, Helvetica, sans-serif;
font-size: 16px;
font-style: normal;
font-weight: bold;
}
-->
</style>
</HEAD>

<%
' validate lower limit of loan amount
if(not(isNumeric(Request.Form("txtLoanLow")))) then
Response.Write "The amount borrowed must be numeric.<BR>"
intErrCnt = intErrCnt + 1 %>
<input name="button" type="button" onclick="history.go(-1)" value="Back"><%
else
dblLoanLow = CDbl(Request.Form("txtLoanLow"))
if(dblLoanLow < 0) then
Response.Write "The loan amount must be a positive number.<BR>"
intErrCnt = intErrCnt + 1%>
<input name="button" type="button" onclick="history.go(-1)" value="Back"><%
end if
end if

' now validate the interest rates
if(not(isNumeric(Request.Form("txtRateLow")))) then
Response.Write "The interest rate must be numeric.<BR>"
intErrCnt = intErrCnt + 1%>
<input name="button" type="button" onclick="history.go(-1)" value="Back"><%
else
dblRateLow = CDbl(Request.Form("txtRateLow"))
if(dblRateLow < 1 OR dblRateLow > 100) then
' make sure it was entered as a percentage, not a decimal number
Response.Write "The interest rate should be entered as a percentage, without the % sign.<BR>"
intErrCnt = intErrCnt + 1%>
<input name="button" type="button" onclick="history.go(-1)" value="Back"><%
end if
end if
' now convert the rate to a decimal number
dblRateLow1 = dblRateLow / 100.0

if(not(isNumeric(Request.Form("txtYears")))) then
Response.Write "The number of years must be numeric not negative.<BR>"
intErrCnt = intErrCnt + 1%>
<input name="button" type="button" onclick="history.go(-1)" value="Back"><%
else
dblYears = CDbl(Request.Form("txtYears"))
' now convert it to the number of monthly periods
dblMonths = dblYears * 12.0
end if

if(intErrCnt > 0) then
Response.Write "<BR>Please press the BACK button fix any errors and re-submit."
Response.End
end if

%>

<BODY>
<table width="400" align="center">
<tr><td>
<H1 align="center">Monthly Payment</H1>
<span class="style2">Amount to Borrow(CY&pound;):</span> <span class="style3"><%= dblLoanLow %><br>
</span><span class="style2"> Length of loan: </span><span class="style3"><%= dblYears %> years<br>
</span><span class="style2"> Annual Interest Rate(%): </span><span class="style3"><%= dblRateLow %><br>
</span><span class="style2"><br>
<%
dblMonthlyRate = dblRateLow1 / 12.0
dblMonths = dblYears * 12
dblPayment = dblLoanLow /((1 - 1 / (1 + dblMonthlyRate)^dblMonths)/dblMonthlyRate) %>

<br>
Monthly Payment(CY&pound;):<span class="style3"> <%= FormatNumber(dblPayment,2,0,0,-2) %>
</span></span>
<P>
</td></tr>
</table>

<p align="center"><font face="Arial">
<input name="button" type="button" onclick="history.go(-1)" value="Back">
</font></p>
</BODY>
</HTML>

amandaaz
04-11-2009, 08:59 AM
How can a student take out a loan seperate from federal that exceeds school costs? I'm a student and most loans for students i've found won't give you more than the school approves. I need money for living costs, etc. What's my best option? This is the only loan I plan on taking out, as I have excess aid I will use for the future. I'm pre-med, so I'm fairly sure I can pay it back. I just haven't been able to work as much lately due to my schedule.



EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum