자바 스크립트는 지정된 된 문자열 유효한 번호 인지를 확인 합니다.

< cfoutput >
< 스크립트 유형 = "텍스트/자바 스크립트 자습서" >
<!-

기능 Baseisnotnum (thenum)
{
숫자 인지 판단
경우 (Basetrim (thenum) = "")
반환 사실;
대 한 (Var i = 0; 난 < thenum.length;i++) 없음
Onenum=thenum.substring (i, i + 1);
경우 (onenum < "0" | | onenum > "9")
반환 사실;
}
반환 허위;
}

기능 Baseisnotint (Theint)
{
정수 있는지 여부를 확인 하려면
Theint = basetrim (Theint);
경우 (theint.length > 1 & & theint.substring (0, 1) = = "0") | | Baseisnotnum (Theint)) 없음
반환 사실;
}
반환 허위;
}

함수 Baseisnotfloat (thefloat)
{
///Determine 경우 부동 소수점 숫자
Len=thefloat.length;
Dotnum = 0;
경우 (len = = 0)
반환 진정한;
위한 (Var i = 0; 난 < 렌; i + +) {
onenum=thefloat.substring (i, i + 1);
경우 (onenum = =.)
dotnum + +;
경우 ((onenum < "0" | | | onenum > "9") & & onenum! = ".") | | DOTNUM > 1)
반환 진정한;

} 경우 (len > 1 & & thefloat.substring (0, 1) = = "0") {
경우 (thefloat.substring (1, 2)! = ".")
반환 진정한;

} return false;
}

기능 Basetrim (str)
{
공간을 제거
Lidx=0;ridx=str.length;
경우 (basetrim.arguments.length==2)
Act=basetrim.arguments[1].tolowercase ();
다른
법 = "All";
대 한 (Var i = 0; 난 < str.length;i++) 없음
Thelstr=str.substring (lidx, lidx + 1);
Therstr=str.substring (ridx, ridx-1);
경우 ((법 "모든" = = | | 법 = = "왼쪽") & & thelstr = = "") 없음
lidx + +;
}
경우 ((법 "모든" = = | | 법 = = "오른쪽") & & therstr = = "") 없음
ridx;
}
}
Str=str.slice (LIDX, RIDX);
str; 반환
}

->
</스크립트 >
< / cfoutput >