dhl:ASP中Clng()函数溢出问题(数据类型转换函数)
Set Rs=Conn.Execute("Select Score,InsureScore From GameScoreInfo Where UserID="& session("userid") &"") if not rs.eof then session("money")=clng(rs(0)) session("yhang")=clng(rs(1)) dim zong zong=session("money")+session("yhang") end if
clng数据溢出。
改为:
<% Set Rs=Conn.Execute("Select Score,InsureScore,(Score+InsureScore) From GameScoreInfo Where UserID="& session("userid") &"") if not rs.eof then session("money")=rs(0)'CDBL(rs(0)) session("yhang")=rs(1)'clng(rs(1)) dim zong zong=rs(2) 'zong=session("money")+session("yhang") end if rs.close %>
Asp数据类型转换函数:
<%
'数据类型转换函数
Cint(str)
'转换正数:True=-1;False=0
'日期:距离1899/12/31天数
'时间:上午段 0;下午段 1
Cstr(str)
'日期=输出格式yyyy/mm/dd
'时间=输出格式Am/Pm hh:mm:ss
Clng(str)
'与Cin()类似
Cbool(num)
'num不为零=True;反之=False
Cdate(str)
'转换
'日期格式 0=#Am 12:00:00#
'正数=距离1899/12/31天数的日期
'浮点数=日期+小数时间
Cbyte(num)
'num<255转换为字节
Csng(str)
'转换为单精度数值
Cdbl(str)
'转换为双精度数值
Ccur(str)
'转换为现金格式
%>
![](http://www.cnblogs.com/Emoticons/msn/64_64.gif)