Create Array Vbscript Instr