Create Array Vbscript String Comparison