Пишу тут свой ASP COM объект, к-рый должен возвращать IXMLDOMDocument2*

IDL string:
[id(28), helpstring("method GetData")]
HRESULT GetData([in] BSTR bstrDataName, [in,optional,defaultvalue(0)] long nStart, [in,optional,defaultvalue(0)] long nLength, [out, retval] VARIANT* pVarData);

Что в GetData():

STDMETHODIMP CMICWrapper::GetData(BSTR bstrDataName, long nStart, long nLength, VARIANT *pVarData)
{
...
IDispatch* pDisp;
hr = GetDirAsXML(strTemp, reinterpret_cast<IXMLDOMDocument2*&>(pDisp));

pVarData->vt = VT_DISPATCH | VT_BYREF;
hr = pDisp->QueryInterface( IID_IDispatch, (void**)&pDisp);
pVarData->ppdispVal = new IDispatch*;
*pVarData->ppdispVal = pDisp;
...
}

Вызов в ASP:

dim oXSN, g_oXML
set oXSN = Createobject("XMICNew.XMICWrapper")
set g_oXML = oXSN.GetData(sPath,0,0)

Получаю "Type mismatch" на 3 строке (oXSN is NOT NOTHING - объект создался нормально).

PS: Вот так вот - тоже ошибка

pVarData->vt = VT_DISPATCH;
hr = pDisp->QueryInterface( IID_IDispatch, (void**)&pDisp);
pVarData->pdispVal = pDisp;
Но везде hr = S_OK

Что такое? Что неправильно у меня?