FS3033错误：XSD元素重复定义致读取失败，求解决方案

错误详情 #

遇到的错误信息如下：

error FS3033: The type provider 'ProviderImplementation.XmlProvider' reported an error: Cannot read sample XSD from 'opendoc.xsd': System.Xml.Schema.XmlSchemaException: Multiple definition of element 'urn:oasis:names:tc:opendocument:xmlns:style:1.0:text-properties' causes the content model to become ambiguous. A content model must be formed such that during validation of an element information item sequence, the particle contained directly, indirectly or implicitly therein with which to attempt to validate each item in the sequence in turn can be uniquely determined without examining the content or attributes of that item, and without any information about the items in the remainder of the sequence.

这个错误源于XmlProvider要求XSD元素定义必须唯一，以此建立元素到类型的一一映射，方便后续XML读取解析。但你的需求仅为从零构建文档，无需这种映射能力，可通过以下方式解决：

解决方案 #

1. 简化目标XSD文件 #

定位XSD中重复定义的urn:oasis:names:tc:opendocument:xmlns:style:1.0:text-properties元素，仅保留一个有效定义，删除其余冗余项。由于你只需生成符合结构的XML，无需完整XSD验证规则，简化后的XSD即可被XmlProvider正常识别。

• 可借助Visual Studio的XML Schema编辑器、在线XSD校验工具快速定位重复元素位置并清理冗余。

2. 直接使用.NET原生XML API构建文档 #

既然不需要XmlProvider的类型读取能力，完全可以绕过它，用System.Xml.Linq手动构建XML，这种方式更灵活且不受XSD限制：

open System.Xml.Linq

// 定义OpenDocument相关命名空间
let nsStyle = XNamespace.Get("urn:oasis:names:tc:opendocument:xmlns:style:1.0")
let nsOffice = XNamespace.Get("urn:oasis:names:tc:opendocument:xmlns:office:1.0")

// 构建text-properties元素
let textProps = XElement(nsStyle + "text-properties",
    XAttribute(nsStyle + "font-name", "Arial"),
    XAttribute(nsStyle + "font-size", "12pt"))

// 构建完整OpenDocument结构
let doc = XDocument(
    XDeclaration("1.0", "UTF-8", "yes"),
    XElement(nsOffice + "document-content",
        XElement(nsOffice + "body",
            XElement(nsOffice + "text", textProps))))

3. 改用XML示例文件替代XSD #

若仍想保留类型安全的构建方式，可给XmlProvider提供一份符合OpenDocument结构的XML示例文件，而非直接使用XSD。XmlProvider会基于示例生成对应类型，避开XSD的歧义问题：

open FSharp.Data

// 基于示例XML生成类型
type OpenDoc = XmlProvider<"sample-opendoc.xml">

// 构建文档
let doc = OpenDoc.Document(
    Body = OpenDoc.Body(
        Text = OpenDoc.Text(
            TextProperties = OpenDoc.TextProperties(FontName = "Arial", FontSize = "12pt"))))

内容的提问来源于stack exchange，提问作者MrD at KookerellaLtd