" >

<% Dim strAge , intAge , blnValid If Request.ServerVariables("CONTENT_LENGTH") <> 0 Then strAge = Trim(Request.form("age")) 'if strAge is a number then we go on If isNumeric(strAge) Then 'convert strAGe to an integer intAge = CInt(strAge) ' if age is between 1 and 120 then success If 1<= intAge and 120 >= intAge Then blnValid = True End If 'if a number is entered then display this Else Response.Write "You didnt enter a valid number
" End If 'if you have a valid number then display a message If blnValid = True Then Response.Write("Your age is " & intAge) 'if number is invalid then display a different message Else Response.Write("Enter an age between 1 and 120 ") End If End If %>