由于在数据库中有一些记录具有Null值,因此创建此代码以过滤没有在“rsActQty”或“rsSumQty”中分配值的记录集。 但无论我尝试什么,似乎这段代码都无法检测到Null值。我不知道我做错了什么。那么请你给我一些建议吗?谢谢。 (此数据库位于MSACCESS中)
我想要的是: - 仅显示“rsActQty”或“rsSumQty”中具有值的记录。 - 当其中一个字段为NULL时,为其指定“0”。
<%
if Rs.eof then
response.write "<tr><td colspan=""6""> "
call displayNotFoundRecord
response.write "</td></tr>"
Else
Dim ActQty, sumQty, Total, rsActQty, rsSumQty, rsPdtn_qty_est, inv_date, res_date
Do while Rs.AbsolutePage = strPageCurrent And Not Rs.EOF
inv_id = rs.fields.item("inv_idRS")
rsActQty = rs.fields.item("sumOfinv_qty_act")
rsSumQty = rs.fields.item("SumOfres_qty")
rsPdtn_qty_est = rs.fields.item("SumOfpdtn_qty_est")
inv_date = rs.fields.item("inv_dateRS")
res_date = rs.fields.item("res_dateRS")
if rsActQty = "" then
ActQty = 0
else
ActQty = rsActQty
end if
if rsSumQty = "" then
sumQty = 0
else
sumQty = rsSumQty
end if
if rsActQty <> "" OR rsSumQty <> "" then
if inv_date = "" then
dateshow = res_date
else
dateshow = inv_date
end if
if res_date = "" then
dateshow = res_date
else
dateshow = res_date
end if
total = rs.fields.item("Total")
%>
<tr class='difcursor'>
<td class="btline" width="25" align="center"><input type="checkbox" name="inv_id" value="<%=inv_id%>" onClick="highlightRow(this,'#FFFFCC','#EFF4FA');"></td>
<td class="btline" <%=genLink(inv_id)%> nowrap style="padding-right: 10px"> <%=rs.fields.item("pd_id")%> </td>
<td class="btline" <%=genLink(inv_id)%> nowrap style="padding-right: 10px"> <%=rs.fields.item("pd_name")%></td>
<td class="btline" <%=genLink(inv_id)%> nowrap style="padding-right: 10px"> <%=PcsToDz(ActQty)%></td>
<td class="btline" <%=genLink(inv_id)%> nowrap style="padding-right: 10px"> <%'=PcsToDz(rs.fields.item("SumOfpdtn_qty_est"))%></td>
<td class="btline" <%=genLink(inv_id)%> nowrap style="padding-right: 10px"> <%=dateshow%></td>
<td class="btline" <%=genLink(inv_id)%> nowrap style="padding-right: 10px"> <%=PcsToDz(sumQty)%></td>
<td class="btline" <%=genLink(inv_id)%> nowrap style="padding-right: 10px"> <%=PcsTODz(Total)%></td>
<td class="btline"></td>
</tr>
<%
end if
Rs.movenext
Loop
End if
Rs.close
set Rs=nothing
Call DBConnClose()
%>
答案 0 :(得分:2)
尝试使用isNull函数。 例如
if not isNull(rs.fields.item("sumOfinv_qty_act")) then
ActQty = rs.fields.item("sumOfinv_qty_act")
else
ActQty = 0
end if
答案 1 :(得分:1)
Null与空白值不同。
您可以尝试将null强制转换为字符串并进行比较:
rsActQty = "" & rs.fields.item("sumOfinv_qty_act")
rsSumQty = "" & rs.fields.item("SumOfres_qty")
你也可以在sql查询中处理null,如:
select iif(isnull(fieldname),0,fieldname) as fieldname from table
将为null值返回0。