[PATCH] vbscript: Implemented GetLocale

[Nikolay Sivov]

> +static HRESULT Global_GetLocale(vbdisp_t *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
> +{
> +    return return_int(res, GetACP());
> +}

This looks completely wrong. Docs say it should return locale id (as 
name suggests), not a codepage value.