ASP实例:检测整数和长整数的函数


检测整数和长整数的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

'检测是否是长整数
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
%>



相关阅读:
css和Ajax制作的表格
Ubuntu Linux系统使用Vim进行Rails编码
javascript一段创建层的代码
CSS技巧教程:css书写技巧
渲染CSS选择器
asp.net 读取Excel数据到DataTable的代码
安全检查表 Windows 2003 IIS服务器
理解表现和结构相分离
通过posts安装 OpenSSH
php 向访客和爬虫显示不同的内容
Get或Post提交值的非法数据处理
JS点出统计器
Oracle备份功能比较
在线增减.htpasswd内的用户
快速导航

Copyright © 2016 phpStudy | 皖ICP备18014864号-4