经典 ASP - 需要帮助更新印花税计算器百分比

Question

我被要求更新印花税计算器百分比，但它写的是asp，我以前从未真正使用它。我已经更新了百分比，但是当我计算数字时，它似乎偏离了大约 100 到 1000 英镑。

http://www.stampdutycalculator.org.uk/ 这是计算器总数应该是多少。

http://smart-search.mobi/cal_test/purchase.asp 这是我正在研究的那个。

http://www.moneysavingexpert.com/mortgages/stamp-duty 纠正前辈和预兆。

这是结果应该是什么的一些例子。

如果输入 £125000 应出现 £0 印花税（这个有效）

如果输入 185000 英镑，则应显示 1200 英镑印花税（我显示 1295 英镑）

如果输入 275000 英镑，则应显示 3750 英镑印花税（为我显示 3850 英镑）

如果输入 937500 英镑，则应显示 37500 英镑印花税（这个有效）

如果输入 £2100000 £165750 印花税（£165900 为我显示）

<小时 />

新费率为：

£0 - £125，000 0%，

£125，001 - £250，000 2%，

£250，001 - £925，000 5%，

£925，001 - £150 万 10%，

超过150万英镑 12%

<%
dim a, b, c, d, e, f, g, h, i, j, k, l, z, x, y, w, v
x = request("leasehold")
y = request("newbuild")
a = request("PurchasePrice")
CurrencySymbol ="£"
if x=yes then w=150
if y=yes then v=150
if a>=0 then b=775-w-v
if a>=100001 then b=800-w-v 'A = PurchasePrice | B = Legal Fees'
if a>=150001 then b=850-w-v
if a>=200001 then b=900-w-v
if a>=250001 then b=975-w-v
if a>=300001 then b=1050-w-v
if a>=400001 then b=1150-w-v
if a>=500001 then b=1275-w-v
if a>=600001 then b=1400-w-v
if a>=700001 then b=0
if b=0 then aa="Please Call to Discuss"

'***PRECENTS ARE HERE******'
if a>=125000 then d=a*0     '0%'
if a>=185000 then d=a*0.007 '0.7%
if a>=250000 then d=a*0.014 '1.4%'
if a>=510000 then d=a*0.03 '3.0%'
if a>=937500 then d=a*0.04 '4.0%'
if a>=2100000 then d=a*0.079 '7.9%'
'*******************'
if a>=0 then f=40        'Land Registry Fee ?'
if a>=50001 then f=70
if a>=80001 then f=120
if a>=100001 then f=190
if a>=200001 then f=270
if a>=500001 then f=540
g = 30
e = 160
c = FormatNumber((b*120/100-b),2) 'V.A.T ?'
h = FormatNumber((g*120/100-g),2)
l = formatnumber((b),2)
m = formatnumber((g),2)
n = formatnumber((f),2)
o = formatnumber((e),2)
p = formatnumber((c),2)
q = formatnumber((d),2)
r = formatnumber((h),2)
k = b+c
i = d+e+f+g+h
j = k+i
s = formatnumber((k),2)
t = formatnumber((i),2)
u = formatnumber((j),2)
v = formatnumber((a),2)
%>

Answer 1

它是

经典的asp，而不是 asp.net，它使用VBScript作为服务器端脚本语言

我假设你的数学是正确的。

您还没有关闭任何带有 end if 的 if 语句，我很惊讶这没有抛出错误消息。 下面是正确语法的示例。

if a>=700001 then b=0 end if

如果您正在检查文本字符串的值，则需要使用引号 - 例如

if x="yes" then w=150 end if

最后，我已经在您的表单上完成了一个视图源 purcase.asp.我注意到您的租赁权和新建复选框的值属性都处于"关闭"状态。 显然，它们需要为"是"才能与asp中的Request（）语句相对应

编辑

鉴于您提供的费率，这是我编写的代码。

<%
a = Clng(Request("a"))
if a<=125000 Then d=(a*0)
Elseif a>125000 And a<=250000 then d=(a*0.02)  
Elseif a>250000 And a<=925000 then d=(a*0.05)
Elseif a>925000 And a<=1500000 then d=(a*0.1)
Elseif a>1500000 then d=(a*0.12)
End if
Response.write d
%>

编辑 2 - 如果我正确理解新的印花税规则，这就是我会这样做的方式。 请注意，57，500 英镑、33，750 英镑和 2，500 英镑是您分别在 10%、5% 和 2% 范围内支付的最高金额。

<%
a = Clng(Request("a"))
if a<=125000 Then d=0
Elseif a>125000 And a<=250000 then d=((a-125000)*0.02)  
Elseif a>250000 And a<=925000 then d=2500+((a-250000)*0.05)
Elseif a>925000 And a<=1500000 then d=33750+2500+((a-925000)*0.1)
Elseif a>1500000 then d=57500+33750+2500+((a-1500000)*0.12)
End if
Response.write d
%>