⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 planning.asp

📁 javascript source code part2
💻 ASP
字号:
<%@ LANGUAGE="JavaScript" %>

<HTML>
<HEAD>

<SCRIPT>
function CheckData() {
   if (!(parseInt(document.frmLoan.LoanValue.value) > 0)) {
      alert("You must enter a valid value for the loan")
      document.frmLoan.LoanValue.focus()
      return false
   }

   if (parseInt(document.frmLoan.LoanValue.value) > <%= Application("MaxLoan") %>) {
      alert("The loan cannot exceed $ " + <%= Application("MaxLoan") %>)
      document.frmLoan.LoanValue.focus()
      return false
   }

   if (!(parseInt(document.frmLoan.PaymentValue.value) > 0)) {
      alert("You must enter a valid value for the monthly payment")
      document.frmLoan.PaymentValue.focus()
      return false
   }

   if (parseInt(document.frmLoan.PaymentValue.value) < 
       <%= Application("MinPayment") %>) {
      alert("The monthly payment cannot be less than $ " +
            <%= Application("MinPayment") %>)
      document.frmLoan.PaymentValue.focus()
      return false
   }

   if (parseInt(document.frmLoan.PaymentValue.value) > 
       parseInt(document.frmLoan.LoanValue.value)) {
      alert("The monthly payment cannot be greater than the loan")
      document.frmLoan.LoanValue.focus()
      return false
   }
   document.frmLoan.submit()
   return true
}
</SCRIPT>

</HEAD>
<BODY>

<H1>Loan Plan</H1>
<HR WIDTH="70%">

Insert the amount of the loan you need and the amount of each periodical payment.
<BR>
You will get the number of monthly payments and a detailed plan of your payments
at the interest rate of <%= Application("Rate") * 100 %>% per year.
<P>

<FORM NAME="frmLoan" METHOD="post" ACTION="loanplan.asp">

   The Loan Value: <INPUT TYPE="text" NAME="LoanValue" SIZE="10">
   <BR>
   The Amount of each monthly Payment: <INPUT TYPE="text" NAME="PaymentValue" SIZE="10">
   <P>

   <INPUT TYPE="button" VALUE="Submit" onClick="CheckData()">
   <INPUT TYPE="reset">

</FORM>

</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -