修改vbscript