ASP Classic 中的 If Not IsNull

Question

我对 asp 还很陌生，遇到了语法错误，如果可以的话，我希望得到帮助。

我有一个 ASP 页面，它显示了一个从 sql 中提取数据的表。大多数数据尚未填充，因此返回 NULL。有问题的数据类型是数字。我需要FormatNumber rs 当它不为空时，如果是则不填充。

这就是我所拥有的

<%=If Not IsNull(rs("ContractValue")) Then FormatNumber(rs("ContractValue"),0) end if%>

但如前所述，我遇到了语法错误。

我做错了什么？

Answer 1

我建议不要在这种情况下使用IsNull()，而是先回答有关语法错误的问题。

原因是 <%= %> 语法的简写

<% Response.Write %>

在经典 ASP 中。

因此，如果不使用速记方法编写，您实际上在做什么；

<% Response.Write If Not IsNull(rs("ContractValue")) Then FormatNumber(rs("ContractValue"),0) End If %>

语法不正确，会触发Syntax Error。

要修复代码，请从<% %> 标签中删除=，如下所示；

<% If Not IsNull(rs("ContractValue")) Then Response.Write FormatNumber(rs("ContractValue"),0) End If %>

用IsNull怎么样？

虽然这可行，但通常会产生奇怪的结果，因为 DBNull （取决于所使用的数据库） 可能不同，并且通常与 VBScript vbNull 变体不同。

由于这一点以及 VBScript 不是强类型的事实，我发现使用简单的快速转换为字符串以避免 Nulls 然后检查有效数据很有用。

数字检查示例

Dim contractValue
contractValue = rs("ContractValue") & ""
If Len(contractValue) > 0 And IsNumeric(contractValue) Then contractValue = Clng(contractValue) Else contractValue = 0

您可以通过编写一段可重用的代码来进一步实现这一点，IIf() 函数在本文中进行了说明。

• How to do a single line If statement in VBScript for Classic-ASP? （Mentioned by @TasosK 在 cmets 中）

类似的东西；

Dim contractValue
contractValue = rs("ContractValue") & ""
contractValue = IIf(Len(contractValue) > 0 And IsNumeric(contractValue), contractValue, 0)

@Paulmade a good point关于参数的评估，在原始代码中可能会中断

contractValue = IIf(Len(contractValue) > 0 And IsNumeric(contractValue), Clng(contractValue), 0)

因为无论结果是True 还是False，都会评估Clng(contractValue)。因此，任何格式都需要在之后进行或更复杂的IIf() 函数版本。

Answer 2

If Not IsNull(rs("ContractValue")) Then 
    <%=FormatNumber(rs("ContractValue"),0)%>
end if

不要着急使用 Classic ASP。

我确定您想在一些 HTML 代码之间插入内容，这会使您将所有这些代码捆绑在一起。如果是这种情况，我建议您将 VBscript 代码与 HTML 分开，例如如下所示；

<%
Dim valueToOutput

If Not IsNull(rs("ContractValue")) Then 
        valueToOutput=FormatNumber(rs("ContractValue"),0)
    end if
%>

<!-- HTML Code continues below with an inserted VBscript variable -->

There are a total of <%=valueToOutput%> oranges available!