vbscript replace double quote in string