ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

vbscript: Ignore fdexNameCaseSensitive flag.

This commit is contained in:
Jacek Caban 2012-08-13 11:03:46 +02:00 committed by Alexandre Julliard
parent 1b2525d1bf
commit fe7533df49
2 changed files with 17 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
dlls/vbscript/tests/run.c
View File

@ -355,6 +355,20 @@ static void test_disp(IDispatch *disp)
SysFreeString(str); SysFreeString(str);
ok(hres == S_OK, "GetDispID(publicProp) failed: %08x\n", hres); ok(hres == S_OK, "GetDispID(publicProp) failed: %08x\n", hres);
id = 0xdeadbeef;
str = a2bstr("publicProp");
hres = IDispatchEx_GetDispID(dispex, str, fdexNameCaseSensitive, &id);
SysFreeString(str);
ok(hres == S_OK, "GetDispID(publicProp) failed: %08x\n", hres);
ok(id == public_prop_id, "id = %d, expected %d\n", id, public_prop_id);
id = 0xdeadbeef;
str = a2bstr("publicprop");
hres = IDispatchEx_GetDispID(dispex, str, fdexNameCaseSensitive, &id);
SysFreeString(str);
ok(hres == S_OK, "GetDispID(publicProp) failed: %08x\n", hres);
ok(id == public_prop_id, "id = %d, expected %d\n", id, public_prop_id);
IDispatchEx_Release(dispex); IDispatchEx_Release(dispex);
} }

4
dlls/vbscript/vbdisp.c
View File

@ -333,7 +333,9 @@ static HRESULT WINAPI DispatchEx_GetDispID(IDispatchEx *iface, BSTR bstrName, DW
if(!This->desc) if(!This->desc)
return E_UNEXPECTED; return E_UNEXPECTED;
if(grfdex & ~(fdexNameEnsure|fdexNameCaseInsensitive)) { /* Tests show that fdexNameCaseSensitive is ignored */
if(grfdex & ~(fdexNameEnsure|fdexNameCaseInsensitive|fdexNameCaseSensitive)) {
FIXME("unsupported flags %x\n", grfdex); FIXME("unsupported flags %x\n", grfdex);
return E_NOTIMPL; return E_NOTIMPL;
} }