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

📄 jsq070721.htm

📁 文件夹保护室一个小巧且功能强大的文件夹保护软件
💻 HTM
字号:
<html>
<head>
<title>商品房贷款计算器</title>
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=gb2312">
<style>
table  {font: 9pt 宋体}
tr {text-align:center}
</style>
</head>
<body><form name=form1>
  <table  border="0">
    <tr> 
      <td colspan="4">商品房贷款计算器</td>
    </tr>
    <tr> 
      <td colspan="4" align=left>你所购买的房屋的单价为 
        <input  name=price maxlength=6 size=8>
        元/平方米,房屋面积为 
        <input  name=area maxlength=6 size=8>
        平方米。</td>
    </tr>
    <tr> 
      <td colspan="4" align=left>你所预计公积金贷款数额为 
        <input name=gj size=8>
        元,或贷款比例为 
        <select name=gjfq>
          <option value="0">(无)</option>
          <option value="3">三成</option>
          <option value="4">四成</option>
          <option value="5">五成</option>
          <option value="6">六成</option>
          <option value="7">七成</option>
          <option value="8">八成</option>
          <option value="9">九成</option>
        </select>
        ,贷款年限为 
        <select size=1 name=gjye>
          <option value=2>2年</option>
          <option value=3>3年</option>
          <option value=4>4年</option>
          <option value=5>5年</option>
          <option value=6>6年</option>
          <option value=7>7年</option>
          <option value=8>8年</option>
          <option value=9>9年</option>
          <option value=10>10年</option>
          <option value=11>11年</option>
          <option value=12>12年</option>
          <option value=13>13年</option>
          <option value=14>14年</option>
          <option value=15 selected>15年</option>
          <option value=16>16年</option>
          <option value=17>17年</option>
          <option value=18>18年</option>
          <option value=19>19年</option>
          <option value=20>20年</option>
          <option value=21>21年</option>
          <option value=22>22年</option>
          <option value=23>23年</option>
          <option value=24>24年</option>
          <option value=25>25年</option>
          <option value=26>26年</option>
          <option value=27>27年</option>
          <option value=28>28年</option>
          <option value=29>29年</option>
          <option value=30>30年</option>
        </select>
        ;</td>
    </tr>
    <tr> 
      <td colspan="4" align=left>你所预计的商业贷款数额为 
        <input name=sy size=8>
        元,或贷款比例为 
        <select name=syfq>
          <option value="0">(无)</option>
          <option value="3">三成</option>
          <option value="4">四成</option>
          <option value="5">五成</option>
          <option value="6">六成</option>
          <option value="7">七成</option>
          <option value="8">八成</option>
          <option value="9">九成</option>
        </select>
        ,贷款年限为 
        <select size=1 name=syye>
          <option value=2>2年</option>
          <option value=3>3年</option>
          <option value=4>4年</option>
          <option value=5>5年</option>
          <option value=6>6年</option>
          <option value=7>7年</option>
          <option value=8>8年</option>
          <option value=9>9年</option>
          <option value=10>10年</option>
          <option value=11>11年</option>
          <option value=12>12年</option>
          <option value=13>13年</option>
          <option value=14>14年</option>
          <option value=15 selected>15年</option>
          <option value=16>16年</option>
          <option value=17>17年</option>
          <option value=18>18年</option>
          <option value=19>19年</option>
          <option value=20>20年</option>
          <option value=21>21年</option>
          <option value=22>22年</option>
          <option value=23>23年</option>
          <option value=24>24年</option>
          <option value=25>25年</option>
          <option value=26>26年</option>
          <option value=27>27年</option>
          <option value=28>28年</option>
          <option value=29>29年</option>
          <option value=30>30年</option>
        </select>
        。</td>
    </tr>
    <tr> 
      <td width="25%">&nbsp; </td>
      <td width="25%">
<input name="button" type=button onClick=result() value=开始计算></td>
      <td width="25%"><input name="reset" type=reset value=清空重来></td>
      <td width="25%">&nbsp;</td>
    </tr>
  </table>
  <br>
  <table width="600" border="1" cellspacing="0">
    <tr> 
      <td colspan="6">各项费用(单位:元)</td>
    </tr>
    <tr> 
      <td>房屋总价</td>
      <td><input readonly name=fze size=10 style="border:none"> </td>
      <td>首付金额</td>
      <td><input readonly name=sfk size=10 style="border:none"> </td>
    </tr></table>
	<table width="600" border="1" cellspacing="0">
    <tr> 
      <td colspan="6">等额本息还款方式</td>
    </tr>
    <tr> 
      <td>&nbsp;</td>
      <td>还款总额</td>
      <td  >每月还款</td>
      <td>支付利息</td>
    </tr>
    <tr> 
      <td>公积金</td>
      <td><input readonly name=hk1 size=10 style="border:none"></td>
      <td><input readonly name=fk1 size=10 style="border:none"></td>
      <td><input readonly name=zlx1 size=10 style="border:none"></td>
    </tr>
    <tr> 
      <td>商业贷款</td>
      <td><input readonly name=hk2 size=10 style="border:none"></td>
      <td><input readonly name=fk2 size=10 style="border:none"></td>
      <td><input readonly name=zlx2 size=10 style="border:none"></td>
    </tr>
    <tr> 
      <td>合计</td>
      <td><input readonly name=hk3 size=10 style="border:none"></td>
      <td><input readonly name=fk3 size=10 style="border:none"></td>
      <td><input readonly name=zlx3 size=10 style="border:none"></td>
    </tr></table>
	
  <table width="600" border="1" cellspacing="0">
    <tr> 
      <td colspan="8">等额本金还款方式</td>
    </tr>
    <tr> 
      <td>&nbsp;</td>
      <td>还款总额</td>
      <td>第一月还款</td>
      <td >最后一月还款</td>
      <td  >逐月递减额</td>
      <td>支付利息</td>
    </tr>
    <tr> 
      <td>公积金</td>
      <td><input readonly name=gjhk size=10 style="border:none"></td>
      <td><input readonly name=gjdy size=10 style="border:none"></td>
      <td><input readonly name=gjzm size=10 style="border:none"></td>
      <td><input readonly name=gjmy size=10 style="border:none"></td>
      <td><input readonly name=gjlx size=10 style="border:none"></td>
    </tr>
    <tr> 
      <td>商业贷款</td>
      <td><input readonly name=syhk size=10 style="border:none"></td>
      <td><input readonly name=sydy size=10 style="border:none"></td>
      <td><input readonly name=syzm size=10 style="border:none"></td>
      <td><input readonly name=symy size=10 style="border:none"></td>
      <td><input readonly name=sylx size=10 style="border:none"></td>
    </tr>
    <tr>
      <td>合计</td>
      <td><input readonly name=hjhk size=10 style="border:none"></td>
      <td><input readonly name=hjdy size=10 style="border:none"></td>
      <td>-[*注]</td>
      <td><input readonly name=hjmy size=10 style="border:none"></td>
      <td><input readonly name=hjlx size=10 style="border:none"></td>
    </tr></table>
  <table width="600" >
      <tr>[*注]由于可能存在公积金贷款和商业贷款年限的不同,所以在此处不做最后一月还款合计的计算。</tr>
      <tr>此计算器所计算出来的结果仅供参考,实际数据以银行计算为准。</tr>
      <tr>本计算器利率标准为中国人民银行2007年07月21日公布执行的新的住房贷款利率。</tr>
      <tr>由于贷款很少有2年一下的,所以本计算器不能计算2年以下的贷款,请谅解!</tr>
  </table>
  </form>
</body>
</html>
<script language=VBScript>
sub result()
pr=form1.price.value '房屋单价
ar=form1.area.value '房屋面积

if pr="" then
 msgbox "请输入房屋单价!"
 exit sub
end if
if ar="" then
 msgbox "请输入房屋面积"
 exit sub
end if

ze=pr*ar '房屋总额

gja=form1.gj.value '公积金贷款
sya=form1.sy.value '商业贷款
gjy=form1.gjye.value '公积金贷款年限
syy=form1.syye.value '商业贷款年限
gjc=form1.gjfq.value'公积金分成贷款
syc=form1.syfq.value'商业分成贷款

if gjy<6 then '设置公积金贷款月利率
   gjb=4.5/1200
 else
   gjb=4.95/1200
end if
if syy<2 then '设置商业贷款月利率
   syb=6.84*0.85/1200
 elseif syy<4 then
   syb=7.02*0.85/1200
 elseif syy<6 then
   syb=7.2*0.85/1200
 else
   syb=7.47*0.85/1200
end if

if gjc=0 then '公积金贷款额
  if gja="" then gja=0
 else
  gja=ze*(gjc/10)
  form1.gj.value=gja
end if
if syc=0 then '商业贷款额
  if sya="" then sya=0
 else
  sya=ze*(syc/10)
  form1.sy.value=sya
end if

'等额本息法
gjd=(1+gjb)^(gjy*12)
gjx=gja*gjb*(gjd/(gjd-1)) '公积金每月还款额
syd=(1+syb)^(syy*12)
syx=sya*syb*(syd/(syd-1)) '商业每月还款额


sf=ze-gja-sya '首付款
i1=round(gjx,2)'每月还款
i2=round(syx,2)
i3=i1+i2
j1=i1*12*gjy'总还款
j2=i2*12*syy
j3=j1+j2
h1=j1-gja'总利息
h2=j2-sya
h3=h1+h2

form1.fze.value=ze
form1.sfk.value=sf
form1.fk1.value=i1
form1.hk1.value=j1
form1.zlx1.value=h1
form1.fk2.value=i2
form1.hk2.value=j2
form1.zlx2.value=h2
form1.fk3.value=i3
form1.hk3.value=j3
form1.zlx3.value=h3

'等额本金法
gjm=round(((gja/gjy)/12),2)'公积金每月还本金
sym=round(((sya/syy)/12),2)'商业每月还本金
gjdj=round(gjm*gjb,2)'公积金每月递减额
sydj=round(sym*syb,2)'商业每月递减额
gjsy=gjm+round(gja*gjb,2)'公积金首月还款
sysy=sym+round(sya*syb,2)'商业首月还款
gjzh=round((gjm*(1+gjb)),2)'公积金末月还款
syzh=round((sym*(1+syb)),2)'商业末月还款

gjen=gjy*12-1
for gjn=0 to gjen
gjl=gjl+round(((gja-gjm*gjn)*gjb),2)
next
syen=syy*12-1
for syn=0 to syen
syl=syl+round(((sya-sym*syn)*syb),2)
next

form1.gjhk.value=gja+gjl
form1.gjdy.value=gjsy
form1.gjzm.value=gjzh
form1.gjmy.value=gjdj
form1.gjlx.value=gjl
form1.syhk.value=sya+syl
form1.sydy.value=sysy
form1.syzm.value=syzh
form1.symy.value=sydj
form1.sylx.value=syl
form1.hjhk.value=gja+gjl+sya+syl
form1.hjdy.value=gjsy+sysy
form1.hjmy.value=gjdj+sydj
form1.hjlx.value=gjl+syl
end sub
</script>



⌨️ 快捷键说明

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