Verificare se il dato è numerico

Grazie al seguente script, sarà possibile scoprire se un dato è espresso in formato numerico oppure no.

<%

function verifica(intNumero)

if not(isNumeric(intNumero)) then

verifica=" <b>NON</b>"

end if

verifica = verifica & " è un numero<br> "

end function

dim intValore

intValore = 10

response.write intValore & verifica(intValore)

intValore = "www.innovatel.it"

response.write intValore & verifica(intValore)

%>