While Loop In Vbscript If Statement