ASP驗證帶小數點數字格式的函數

ASP驗證帶小數點數字格式的函數，數字範圍是922337203685477 ~ -922337203685477 ，非常實用。

ASP驗證帶小數點數字格式的函數，數字範圍是922337203685477 ~  -922337203685477 ，非常實用。 

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