C / C++ / MFC

IShellLink* pShellLink = NULL;

// Get a pointer to the IShellLink interface.
hRes = ::CoCreateInstance(CLSID_ShellLink, NULL,
    CLSCTX_INPROC_SERVER, IID_IShellLink, (void**) &pShellLink);

if (SUCCEEDED(hRes))
{
    // Set the path to the shortcut target, and add the Description.
    if (SUCCEEDED(hRes = pShellLink->SetPath(sTarget))                 &&
        SUCCEEDED(hRes = pShellLink->SetArguments(sArguments))         &&
        SUCCEEDED(hRes = pShellLink->SetWorkingDirectory(sWorkingDir)) &&
        SUCCEEDED(hRes = pShellLink->SetShowCmd(nCmdShow))             &&
        SUCCEEDED(hRes = pShellLink->SetDescription(pComment)))
    {

        // Get a pointer to the IPersistFile interface
        IPersistFile* pPersistFile = NULL;

        // Query IShellLink for the IPersistFile interface for saving the
        // shortcut in persistent storage.
        hRes = pShellLink->QueryInterface(IID_IPersistFile, (void**) &pPersistFile);

        if (SUCCEEDED(hRes))
        {
            BSTR bstrTest = sLinkDesc.AllocSysString();

            // Save the link by calling IPersistFile::Save.
            hRes = pPersistFile->Save(bstrTest, TRUE);
            ::SysFreeString(bstrTest);
            pPersistFile->Release();
        }
    }
    pShellLink->Release();
}