教学之友,学习之友。

站长教学网

当前位置: 站长教学网 > 网站编程 > ASP教程 >

ASP检测数字是否整数或长整数的函数代码

时间:2012-03-31 00:18来源:未知 作者:ken 点击:

检测整数和长整数的ASP函数

<%
'检测字符串是否是整数
Function Is_Int(a_str)
    If not isnumeric(a_str) or len(a_str) > 5 Then
        Is_Int = false 
        Exit Function 
    Elseif len(a_str) < 5 then
        Is_Int = true 
        Exit Function 
    End if 
    If cint(left(a_str , 4)) > 3276 Then
        Is_Int = false
        Exit Function
    Elseif cint(left(a_str , 4)) = 3276 And cint(right(a_str , 1)) > 7 Then
        Is_Int = false
        Exit Function
    Else
        Is_Int = true
        Exit Function
    End if 
End Function
站长教学网 eduyo.com
'检测是否是长整数
Function Is_Lng(a_str)
    If not isnumeric(a_str) or len(a_str) > 10 Then
        Is_Lng = false
        Exit Function 
    Elseif len(a_str) < 10 Then
        Is_Lng = true 
        Exit Function 
    End If 
    If clng(left(a_str , 9)) > 214748367 Then
        Is_Lng = false
        Exit Function
    Elseif clng(left(a_str , 9)) = 214748367 And clng(right(a_str , 1)) > 7 Then
        Is_Lng = false
        Exit Function
    Else
        Is_Lng = true
        Exit Function
    End If 
End Function
%>

(责任编辑:ken)
TAG标签: asp 函数 整数 长整数
顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价:
表情:
注册登录:不允许匿名留言,登录后留言无需输入验证码。
栏目列表
最新内容