Thanks Les, it is always nice to get appreciated.
To avoid alphabetic input, I would even add a more explicit conversion:
 Code:
Dim $input
CLS
?"input subnet to search?"
Do
	Gets $input
Until 255 >= $input AND 0 <= $input AND $input = CStr(CInt($input))

Hey, that answers the initial question


Edited by Witto (2007-04-02 10:11 AM)