登录模块加载中...
会员投稿 投稿指南 今天是:
打印本页 | 关闭窗口 | 双击滚屏 您的位置首页>>网页制作学习园地>>ASP教程>>ASP技巧>>ASP强转数字的两个通用函数
ASP强转数字的两个通用函数
来源: ‖ 作者: ‖ 点击: ‖ 时间:14-03-13 14:45:37 ‖ 【 】‖ 我要投稿

第一个函数,可以强转带小数点的数字格式。 

Public Function CheckNumeric(ByVal CHECK_ID)
  If CHECK_ID <> "" And IsNumeric(CHECK_ID) Then
   If CHECK_ID > 922337203685477 Then CHECK_ID = 0
   If CHECK_ID < -922337203685477 Then CHECK_ID = 0
   CHECK_ID = CCur(CHECK_ID)
  Else
   CHECK_ID = 0
  End If
  CheckNumeric = CHECK_ID
 End Function

 

'第二个函数,可以强转为整数格式。 

 Public Function ChkNumeric(ByVal CHECK_ID)
  If CHECK_ID <> "" And IsNumeric(CHECK_ID) Then
   If CHECK_ID < 0 Then CHECK_ID = 0
   If CHECK_ID > 2147483647 Then CHECK_ID = 0
   CHECK_ID = CLng(CHECK_ID)
  Else
   CHECK_ID = 0
  End If
  ChkNumeric = CHECK_ID
 End Function

加入收藏:  加入收藏夹  | 发送给好友:  发送给好友
责任编辑:admin
相关文章列表
请文明参与讨论,禁止漫骂攻击。  
网友评论