diff --git a/ole/ole2.c b/ole/ole2.c
index 36b05b2c1b5..23202bc2f28 100644
--- a/ole/ole2.c
+++ b/ole/ole2.c
@@ -9,6 +9,7 @@
 #include "ole2.h"
 #include "process.h"
 #include "debug.h"
+#include "compobj.h"
 
 /******************************************************************************
  *		OleBuildVersion	[OLE2.1]
@@ -93,6 +94,15 @@ HRESULT WINAPI GetRunningObjectTable16(DWORD reserved, LPVOID *pprot) {
 	return E_FAIL;
 }
 
+
+/***********************************************************************
+ *           GetRunningObjectTable32 (OLE2.73)
+ */
+HRESULT WINAPI GetRunningObjectTable32(DWORD reserved, LPVOID *pprot) {
+	FIXME(ole,"(%ld,%p),stub!\n",reserved,pprot);
+	return E_FAIL;
+}
+
 /***********************************************************************
  *           RegisterDragDrop16 (OLE2.35)
  */
@@ -135,6 +145,18 @@ HRESULT WINAPI RevokeDragDrop32(
 	return S_OK;
 }
 
+/***********************************************************************
+ *           OleRegGetUserType (OLE32.122)
+ */
+HRESULT WINAPI OleRegGetUserType32( 
+	REFCLSID clsid, 
+	DWORD dwFormOfType,
+	LPOLESTR32* pszUserType)
+{
+	FIXME(ole,",stub!\n");
+	return S_OK;
+}
+
 /***********************************************************************
  * CreateBindCtx32 [OLE32.52]
  */
diff --git a/relay32/ole32.spec b/relay32/ole32.spec
index ca838b21aba..25f1d3030d7 100644
--- a/relay32/ole32.spec
+++ b/relay32/ole32.spec
@@ -73,7 +73,7 @@ type	win32
  70 stub GetHGlobalFromILockBytes
  71 stub GetHGlobalFromStream
  72 stub GetHookInterface
- 73 stub GetRunningObjectTable
+ 73 stdcall GetRunningObjectTable(long ptr) GetRunningObjectTable32
  74 stub IIDFromString
  75 stub IsAccelerator
  76 stub IsEqualGUID
@@ -122,7 +122,7 @@ type	win32
 119 stub OleRegEnumFormatEtc
 120 stub OleRegEnumVerbs
 121 stub OleRegGetMiscStatus
-122 stub OleRegGetUserType
+122 stdcall OleRegGetUserType(long long ptr) OleRegGetUserType32
 123 stub OleRun
 124 stub OleSave
 125 stub OleSaveToStream