Create Array Vbscript String Manipulation