Поделиться через


XMLMapping.SetMappingByNode(CustomXMLNode) Метод

Определение

Позволяет создавать или изменять сопоставление xml-данных в элементе управления содержимым. Возвращает значение True, если Microsoft Office Word сопоставляет элемент управления содержимым с пользовательским XML-узлом в пользовательском хранилище XML-данных документа.

public:
 bool SetMappingByNode(Microsoft::Office::Core::CustomXMLNode ^ Node);
public bool SetMappingByNode (Microsoft.Office.Core.CustomXMLNode Node);
abstract member SetMappingByNode : Microsoft.Office.Core.CustomXMLNode -> bool
Public Function SetMappingByNode (Node As CustomXMLNode) As Boolean

Параметры

Node
CustomXMLNode

Указывает XML-узел, с которым сопоставляется текущий элемент управления содержимым.

Возвращаемое значение

Boolean

Примеры

В следующем примере устанавливается встроенное свойство документа для автора документа, вставляется новый элемент управления содержимым в активный документ, а затем xml-сопоставление элемента управления со встроенным свойством документа.

<span class="label">Dim objcc As ContentControl































































































































Dim objNode As CustomXMLNode































































































































Dim objMap As XMLMapping































































































































Dim blnMap As Boolean































































































































































































































































ActiveDocument.BuiltInDocumentProperties("Author").Value = "David Jaffe"































































































































































































































































Set objcc = ActiveDocument.ContentControls.Add _































































































































    (wdContentControlDate, ActiveDocument.Paragraphs(1).Range)































































































































































































































































Set objNode = ActiveDocument.CustomXMLParts.SelectByNamespace _































































































































    ("http://schemas.openxmlformats.org/package/2006/metadata/core-properties") _































































































































    (1).DocumentElement.ChildNodes(1)































































































































































































































































Set objMap = objcc.XMLMapping































































































































blnMap = objMap.SetMappingByNode(objNode)</span>

В следующем примере создается настраиваемая XML-часть, а затем создаются два элемента управления содержимым и каждый элемент управления содержимым сопоставляется с определенным узлом в пользовательском XML-коде.

<span class="label">Dim objRange As Range































































































































Dim objCustomPart As CustomXMLPart































































































































Dim objCustomControl As ContentControl































































































































Dim objCustomNode As CustomXMLNode































































































































































































































































Set objCustomPart = ActiveDocument.CustomXMLParts.Add































































































































objCustomPart.LoadXML ("&lt;books&gt;&lt;book&gt;&lt;author&gt;Matt Hink&lt;/author&gt;" &amp; _































































































































    "&lt;title&gt;Migration Paths of the Red Breasted Robin&lt;/title&gt;&lt;genre&gt;non-fiction&lt;/genre&gt;" &amp; _































































































































    "&lt;price&gt;29.95&lt;/price&gt;&lt;pub_date&gt;2007-02-01&lt;/pub_date&gt;&lt;abstract&gt;" &amp; _































































































































    "You see them in the spring outside your windows.  You hear their lovely " &amp; _































































































































    "songs wafting in the warm spring air.  Now follow the path of the red breasted robin " &amp; _































































































































    "as it migrates to warmer climes in the fall, and then back to your back yard " &amp; _































































































































    "in the spring.&lt;/abstract&gt;&lt;/book&gt;&lt;/books&gt;")































































































































































































































































ActiveDocument.Range.InsertParagraphBefore































































































































Set objRange = ActiveDocument.Paragraphs(1).Range































































































































Set objCustomNode = objCustomPart.SelectSingleNode _































































































































    ("/books/book/title")































































































































Set objCustomControl = ActiveDocument.ContentControls _































































































































    .Add(wdContentControlText, objRange)































































































































objCustomControl.XMLMapping.</span>
<span class="label">SetMappingByNode</span>
<span class="label">objCustomNodeobjRange.InsertParagraphAfterSet objRange = ActiveDocument.Paragraphs(2).RangeSet objCustomNode = objCustomPart.SelectSingleNode _    ("/books/book/abstract")Set objCustomControl = ActiveDocument.ContentControls _    .Add(wdContentControlText, objRange)objCustomControl.XMLMapping.</span>
<span class="label">SetMappingByNode</span>
<span class="label">objCustomNode</span>

Комментарии

Если сопоставление XML уже существует, Word заменяет существующее сопоставление XML, а содержимое нового сопоставленного XML-узла заменяет текст элемента управления содержимым. См. также SetMapping(String, String, CustomXMLPart) метод .

Примечание. Создание сопоставления для элемента управления с содержимым в формате форматированного текста приводит к ошибке во время выполнения.

Применяется к