Asp classic 经典asp字符串类型不匹配时出错

我一直在犯这个错误

Microsoft VBScript运行时错误“800a000d”

类型不匹配：“[字符串：“””

intHPrimary=rtrim（request.form（“chkHPrimary”））
如果len（intHPrimary）>0且为数字（intHPrimary），则
intHPrimary=cint（intHPrimary）
否则
初始值=0
如果结束
0然后%>---这就是我得到错误的地方

稍微重构一下应该会有所帮助

0且为数值型（intHPrimary），然后intHPrimary=CInt（intHPrimary）否则intHPrimary=0
如果intHPrimary>0，则选中=“已选中”否则选中=“”
%>

---

当HTML不必要时，尽量不要复制它，而是训练你的逻辑，然后应用结果。此外，请确保代码位于ASP预处理器标记

内，否则它将不会被视为代码。

否则选中=“

不是强制性的：）@Zam我喜欢描述性的，这样就不会有歧义。

intHPrimary  = rtrim(request.form("chkHPrimary"))
if  len(intHPrimary) > 0 and isNumeric(intHPrimary) then 
    intHPrimary = cint(intHPrimary)
else 
    intHPrimary = 0
end if 
<%if intHPrimary > 0 then%>---This is where I get my error
    <input type="checkbox" name="chkHPrimary" value= "1" checked />
<%else%>
    <input type="checkbox" name="chkHPrimary" value= "1" />
<%end if%></td>