vbscript fix