asp中利用SQL查询得到的空值怎么与有效数值相加
日期：2014-05-16 浏览次数：20961 次
asp中利用SQL查询得到的空值如何与有效数值相加
<%
set xm01= Server.CreateObject("ADODB.Recordset")
'数据库查询
sql="select b.* from yhmm a,xmcx01 b where a.name=b.name"
xm01.open sql,conn,1,1
%>
<%
set xm02= Server.CreateObject("ADODB.Recordset")
'数据库查询
sql="select b.* from yhmm a,xmcx02 b where a.name=b.name"
xm02.open sql,conn,1,1
%>
<%
set xm03= Server.CreateObject("ADODB.Recordset")
'数据库查询
sql="select b.* from yhmm a,xmcx03 b where a.name=b.name"
xm03.open sql,conn,1,1
%>
<%
set xm04= Server.CreateObject("ADODB.Recordset")
'数据库查询
sql="select b.* from yhmm a,xmcx04 b where a.name=b.name"
xm04.open sql,conn,1,1
%>
<%
dim sum_xm
sum_xm=0
sum_xm=sum_xm+xm01("xmtj")+xm02("xmtj")+xm03("xmtj")+xm04("xmtj")
%>
xm01、xm02、xm03、xm04中的"xmtj"可能会是空，
如何改写代码，使sum_xm值相加正确？
请高手指点。
------解决方案--------------------
<%
set xm01= Server.CreateObject("ADODB.Recordset")
'数据库查询
sql="select b.* from yhmm a,xmcx01 b where a.name=b.name"
xm01.open sql,conn,1,1
%>
<%
set xm02= Server.CreateObject("ADODB.Recordset")
'数据库查询
sql="select b.* from yhmm a,xmcx02 b where a.name=b.name"
xm02.open sql,conn,1,1
%>
<%
set xm03= Server.CreateObject("ADODB.Recordset")
'数据库查询
sql="select b.* from yhmm a,xmcx03 b where a.name=b.name"
xm03.open sql,conn,1,1
%>
<%
set xm04= Server.CreateObject("ADODB.Recordset")
'数据库查询
sql="select b.* from yhmm a,xmcx04 b where a.name=b.name"
xm04.open sql,conn,1,1
%>
<%
dim sum_xm
sum_xm=0
sum_xm=sum_xm+xm01("xmtj")+xm02("xmtj")+xm03("xmtj")+xm04("xmtj")
%>
xm01、xm02、xm03、xm04中的"xmtj"可能会是空，
如何改写代码，使sum_xm值相加正确？
请高手指点。
------解决方案--------------------
function getnumber(v)
if isnumeric(v) then
getnumber=v
else
getnumber=0
end if
end function
dim sum_xm
sum_xm=0
sum_xm=sum_xm+getnumber(xm01("xmtj"))+getnumber(xm02("xmtj"))+getnumber(xm03("xmtj"))+xm04getnumber(("xmtj"))
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
