vbscript: Implemented Abs