Vbscript Create Array