VBScript fix