【求助】两块if写在一起则出错

恭喜发财 · 发表于 2022-5-28 17:37:14

第一种，两个if分开写，可执行，无错误
dim companyBH
companyBH="a"
if not isnumeric(companyBH) then
  response.write "编码不是数字！"
elseif companyBH<1 then
  response.write "编号小于1！"
end if

第二种，两个if写在一行里，不可执行，出错
dim companyBH
companyBH="a"
if not isnumeric(companyBH) or companyBH<1 then
  response.write "编码不是数字或编码小于1！"
end if

请大神帮忙指教一下，谢谢

xuanxiao · 发表于 2022-5-28 23:39:52

下面是提示

很显然提醒类型不匹配。

微软官方说明：
使用 VBScript 对 Numeric 字段类型执行数值比较或计算时，可能会收到以下错误消息：

错误消息 1

Microsoft VBScript 运行时错误“800a000d”
类型不匹配

错误消息 2

Microsoft VBScript 运行时错误“800a01ca”
变量使用 VBScript 中不支持的自动化类型

建议处理方法：

dim companyBH
dim errMsg
companyBH="a"
errMsg=""
if not isnumeric(companyBH) then
errMsg=errMsg&"编码不是数字！"
end if
if isnumeric(companyBH) then
if companyBH<1 then errMsg=errMsg&"编码小于1！" end if
end if
response.write errMsg

复制代码

官方Q群

天天ASP家园网友互动群

群1: 697497501(新手学习互助群)

群2: 47598123(进阶应用群)

天天ASP家园网友互动群

[问与答] 【求助】两块if写在一起则出错

在线客服

官方Q群 天天ASP家园网友互动群 群1: 697497501(新手学习互助群) 群2: 47598123(进阶应用群)

天天ASP家园网友互动群

[问与答] 【求助】两块if写在一起则出错

在线客服

官方Q群

天天ASP家园网友互动群

群1: 697497501(新手学习互助群)

群2: 47598123(进阶应用群)