أريد تركيب ملف lnk كي أحصل على الإختصار

بكل بساطة مرر مسار ملف lnk إلى هذة الدالة

void   GetPathLnk(LPSTR path)
{
	char FileName[MAX_PATH];
     strcpy(FileName,path);
    HRESULT  hResult    = NULL; 
	hResult = CoInitialize(NULL);

	WIN32_FIND_DATA w;
	HANDLE f = FindFirstFile(FileName,&w);
	CloseHandle(f);

	IShellLink *pShellLink = NULL;

  hResult=CoCreateInstance(CLSID_ShellLink, NULL, 
        CLSCTX_INPROC_SERVER, IID_IShellLink, (void**) &pShellLink); 

  /////////////////////////////////////////////2
  IPersistFile *pPersistFile = NULL;

hResult=pShellLink->QueryInterface(IID_IPersistFile,(void**)&pPersistFile);

	//////////////////////////////////////////////////3
	WORD wFileName[MAX_PATH];
	MultiByteToWideChar(CP_ACP,0,FileName,-1,wFileName,MAX_PATH);
	pPersistFile->Load(wFileName,STGM_READ);

	/////////////////////////////////////////////////////4
pShellLink->Resolve(m_hWnd ,SLR_NO_UI);

	////////////////////////////////////////////////////////5
	char ShortPointedFile[MAX_PATH];
pShellLink->GetPath(ShortPointedFile,MAX_PATH,&w,SLGP_SHORTPATH);

	///////////////////////////////////////////////////////////6
	char LongPointedFile[MAX_PATH];
	char npro[100]="";
	GetLongPathName(ShortPointedFile,LongPointedFile,MAX_PATH);
GetFileTitle (LongPointedFile,npro,MAX_PATH);

MessageBox (NULL,LongPointedFile,NULL,MB_OK);

	pPersistFile->Release();
  pShellLink->Release();

  CoUninitialize();


}

وطريقة إستخدام الدالة

 GetPathLnk("d:\\file.lnk");

وعند تنفيذها يظهر مسج , يحتوي على عنوان البرنامج الحقيقي

مثل C:\windows\file.exe

وبالتوفيق ,,

أشكرك من أعماق قلبي

يا أستاذنا Jaas