<%
dim str,num
str&#61;"abc"
num&#61;123
response.Write( isnumeric(str)&"
" )
response.Write( isnumeric(num)&"
" )
%>