C / C++ / MFC

Excel::_ApplicationPtr pApplication;
Excel::_WorkbookPtr pBook;
HRESULT hr;
_variant_t	varOption( (long) DISP_E_PARAMNOTFOUND, VT_ERROR);
 CoInitializeEx(NULL,COINIT_MULTITHREADED);
hr = pApplication.CreateInstance(__uuidof(Excel::Application));
if (FAILED(hr) )
{
   return 0;
}
pBook = pApplication->Workbooks->Open( (_bstr_t)fileNameopen,varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption );

HMENU Controls = CreatePopupMenu();
AppendMenu(Controls, MF_STRING, 0, L"Resume");
AppendMenu(Controls, MF_STRING, 0, L"Pause");
AppendMenu(Controls, MF_SEPARATOR, 0, 0);
AppendMenu(Controls, MF_STRING, 0, L"Delete");
AppendMenu(Controls, MF_SEPARATOR, 0, 0);
AppendMenu(Controls, MF_STRING, 0, L"Change Filename");
AppendMenu(Controls, MF_STRING, 0, L"Change URL");
AppendMenu(Controls, MF_SEPARATOR, 0, 0);
AppendMenu(Controls, MF_STRING, 0, L"Check MD5");
TrackPopupMenuEx( Controls, TPM_LEFTALIGN | TPM_BOTTOMALIGN | TPM_LEFTBUTTON | TPM_HORPOSANIMATION, xPos, yPos, g_hWindow, NULL);

case WM_MOUSEMOVE
xPos = GET_X_LPARAM(lParam); 
yPos = GET_Y_LPARAM(lParam);

ICustomDestinationList* pJumpList = NULL;
if (SUCCEEDED(CoCreateInstance(CLSID_DestinationList, NULL, CLSCTX_INPROC_SERVER, IID_PPV_ARGS(&pJumpList))))
{
    pJumpList->SetAppID(L"MyJumpList");

    UINT uMaxSlots;
    IObjectArray* pRemoved = NULL;
    if (SUCCEEDED(pJumpList->BeginList(&uMaxSlots, IID_PPV_ARGS(&pRemoved))))
    {

        IObjectCollection* pContents = NULL;
        if (SUCCEEDED(CoCreateInstance(CLSID_EnumerableObjectCollection, NULL,
            CLSCTX_INPROC_SERVER, IID_PPV_ARGS(&pContents))))
        {
            IShellLink* pLink = NULL;
            IPropertyStore* pStore = NULL;
            PROPVARIANT var;
            if (SUCCEEDED(CoCreateInstance(CLSID_ShellLink, NULL,
                CLSCTX_INPROC_SERVER, IID_PPV_ARGS(&pLink))))
            {
                pLink->SetPath(L"C:\\md5summer.exe");
                pLink->QueryInterface(IID_PPV_ARGS(&pStore));
                InitPropVariantFromString(L"Launch MD5Summer", &var);
                pStore->SetValue(PKEY_Title, var);
                pStore->Commit();
                pContents->AddObject(pLink);

                pStore->Release(); pStore = NULL;
                pLink->Release(); pLink = NULL;

                IObjectArray* pContentsArr = NULL;
                pContents->QueryInterface(IID_PPV_ARGS(&pContentsArr));
                pJumpList->AddUserTasks(pContentsArr);
                pJumpList->CommitList();
            }
        }
    }
}