Jacek Caban : vbscript: Fail to set non-object values with DISPATCH_PROPERTYPUTREF flag.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 86283b31db9c3fe43f42d024612365c4cd3b7dd1
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=86283b31db9c3fe43f42d02461...

Author: Jacek Caban <jacek(a)codeweavers.com>
Date:   Tue Mar  3 14:40:59 2015 +0100

vbscript: Fail to set non-object values with DISPATCH_PROPERTYPUTREF flag.

---

 dlls/vbscript/vbdisp.c | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/dlls/vbscript/vbdisp.c b/dlls/vbscript/vbdisp.c
index a07020b..eec0bf6 100644
--- a/dlls/vbscript/vbdisp.c
+++ b/dlls/vbscript/vbdisp.c
@@ -116,6 +116,9 @@ static HRESULT get_propput_arg(script_ctx_t *ctx, const DISPPARAMS *dp, WORD fla
             *v = value;
             *is_owned = TRUE;
         }
+    }else if(!(flags & DISPATCH_PROPERTYPUT)) {
+        WARN("%s can't be assigned without DISPATCH_PROPERTYPUT flag\n", debugstr_variant(v));
+        return DISP_E_EXCEPTION;
     }
 
     return S_OK;