Vbscript Return Multiple Values From Function