msscript: Implement GetMiscStatus().

dlls/msscript.ocx/Makefile.in

 MODULE    = msscript.ocx
 RC_SRCS   = msscript.rc
 IDL_SRCS  = msscript.idl
-IMPORTS   = oleaut32
+IMPORTS   = ole32 oleaut32
 
 C_SRCS = \
 	msscript.c

dlls/msscript.ocx/msscript.c

@@ -618,9 +618,9 @@ static HRESULT WINAPI OleObject_GetMiscStatus(IOleObject *iface, DWORD aspect, D
 {
     ScriptControl *This = impl_from_IOleObject(iface);
 
-    FIXME("(%p)->(%d %p)\n", This, aspect, status);
+    TRACE("(%p)->(%d %p)\n", This, aspect, status);
 
-    return E_NOTIMPL;
+    return OleRegGetMiscStatus(&CLSID_ScriptControl, aspect, status);
 }
 
 static HRESULT WINAPI OleObject_SetColorScheme(IOleObject *iface, LOGPALETTE *logpal)

dlls/msscript.ocx/tests/msscript.c

@@ -28,12 +28,21 @@
 static void test_oleobject(void)
 {
     IOleObject *obj;
+    DWORD status;
     HRESULT hr;
 
     hr = CoCreateInstance(&CLSID_ScriptControl, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
             &IID_IOleObject, (void**)&obj);
     ok(hr == S_OK, "got 0x%08x\n", hr);
 
+    if (0) /* crashes on w2k3 */
+        hr = IOleObject_GetMiscStatus(obj, DVASPECT_CONTENT, NULL);
+
+    status = 0;
+    hr = IOleObject_GetMiscStatus(obj, DVASPECT_CONTENT, &status);
+    ok(hr == S_OK, "got 0x%08x\n", hr);
+    ok(status != 0, "got 0x%08x\n", status);
+
     IOleObject_Release(obj);
 }