no letters no decimers !

set correctEntry to false
repeat while correctEntry is false
   set textDisplay to "Tu as quel age?"
   display dialog textDisplay default answer ""
   set valeurSaisie to text returned of the result
   try
      set valeurSaisie to valeurSaisie as integer
      set correctEntry to true
   on error
      try
         set valeurSaisie to valeurSaisie as number
         display dialog "Vous avez saisi un nombre décimal !"
      on error
         display dialog "Vous avez saisi du texte !"
      end try
   end try
end repeat
display dialog "Tu as donc " & valeurSaisie & " ans"
end