如何从word对象模型使用C++接口在word中添加CustomXMLParts？

#include <iostream>
#include <atlbase.h>
#include <atlcom.h>
#include <atlconv.h>

int main()
{
    // 初始化COM库
    CoInitialize(NULL);

    // 创建Word应用程序对象
    CComPtr<IDispatch> pWordApp;
    HRESULT hr = pWordApp.CoCreateInstance(__uuidof(Word::Application));
    if (FAILED(hr))
    {
        std::cout << "Failed to create Word application object." << std::endl;
        return -1;
    }

    // 设置Visible属性为True，显示Word应用程序窗口
    pWordApp->PutVisible(VARIANT_TRUE);

    // 打开一个Word文档
    CComPtr<IDispatch> pDocuments;
    pWordApp->get_Documents(&pDocuments);
    CComVariant varDocPath("C:\\path\\to\\your\\document.docx");
    CComPtr<IDispatch> pDocument;
    pDocuments->Open(varDocPath, CComVariant(false), CComVariant(true), &pDocument);

    // 获取文档的CustomXMLParts集合对象
    CComPtr<IDispatch> pCustomXMLParts;
    CComPtr<IDispatch> pDocumentCustomXMLParts;
    pDocument->get_CustomXMLParts(&pDocumentCustomXMLParts);
    pDocumentCustomXMLParts->QueryInterface(&pCustomXMLParts);

    // 创建一个CustomXMLPart对象
    CComPtr<IDispatch> pCustomXMLPart;
    pCustomXMLParts->Add(CComVariant("<root></root>"), &pCustomXMLPart);

    // 设置CustomXMLPart的内容
    CComBSTR bstrXML("<root><data>Hello, World!</data></root>");
    CComPtr<IXMLDOMDocument> pXMLDoc;
    pXMLDoc.CoCreateInstance(__uuidof(DOMDocument));
    pXMLDoc->loadXML(bstrXML);
    CComPtr<IXMLDOMNode> pXMLNode;
    pXMLDoc->get_firstChild(&pXMLNode);
    pCustomXMLPart->PutXML(pXMLNode);

    // 关闭并保存Word文档
    pDocument->Close(CComVariant(true));

    // 释放COM资源
    pWordApp.Release();
    pDocuments.Release();
    pDocument.Release();
    pCustomXMLParts.Release();
    pDocumentCustomXMLParts.Release();
    pCustomXMLPart.Release();
    pXMLDoc.Release();
    pXMLNode.Release();

    // 反初始化COM库
    CoUninitialize();

    return 0;
}