<%
dim str,num
str="abc"
num=123
response.Write( isnumeric(str)&"<br>" )
response.Write( isnumeric(num)&"<br>" )
%>