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
%>

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

下载本文示例代码


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

阅读(236) | 评论(0) | 转发(0) |

0

上一篇：谈调用Java webservice访问被拒绝解决方案

下一篇：怎样在不支持FSO的服务器上使用XMLDOM创建HTML文件