$obj->GetErrorStr(Variant(VT_I4|VT_BYREF,12345),$errstr);

##</code><code>##

$obj->GetErrorStr(Variant(VT_I4,12345),$errstr);