VC，JAVA，DELPHI高手向高手求助，急，急，急！！！！

[t_xuyong]

有一段程序（在WINDOWS桌面上建快捷方式）：

IShellLink *ppv=NULL;

HRESULT hres=CoCreateInstance (CLSID_ShellLink,NULL,CLSCTX_INPROC_SERVER,IID_IShellLinkA,(LPVOID *)ppv);

if(SUCCEEDED(hres))
{
ppv->SetPath(lpszPath);
。。。。。。
}else
{
MessageBox(NULL,"failed","good",MB_OK);
}

为什么CoCreateInstance函数调结束后，老是处于失败状态，即弹出 MessageBox，告诉我是FAILED呢？

[lqbn]

Return Values
S_OK
An instance of the specified object class was successfully created.
REGDB_E_CLASSNOTREG
A specified class is not registered in the registration database. Also can indicate that the type of server you requested in the CLSCTX enumeration is not registered or the values for the server types in the registry are corrupt.
CLASS_E_NOAGGREGATION
This class cannot be created as part of an aggregate.
E_NOINTERFACE
The specified class does not implement the requested interface, or the controlling IUnknown does not expose the requested interface.

[t_xuyong]

Thank you ,but still have problem:
ppv最后的结果是NULL，这是怎么回事情呢？

[ThisTimeThree]

是不是用 (LPVOID *)&ppv, Instead

[bcb_fans]

if(SUCCEEDED(CoInitialize(NULL)))
{
//在这里做你的事
//....
CoUninitialize();
}

另：代码也有错误：

.....,(LPVOID *)ppv);

改为-->>>

.....,(LPVOID *)&ppv);//不要少了 &

[lqbn]

应该用(LPVOID *)&ppv