F# 从 XML 字符串执行 XSL 转换并返回字符串

Question

查看 .NET 中的 XSLCompiledTransform 类，试图找到一种在 F# 中使用它的简洁方法。我不熟悉字符串读取器/写入器，但我将其视为完成此任务的主要方法。还是我想要 XML 阅读器？

我有一个函数，它接受两个参数——一个 XML 字符串和一个 XSLT 样式表。我想返回一个 XML 字符串。

let applyXSLTransform xml xslFile =        
        let xslt = XslCompiledTransform()
        xslt.Load(xslFile)
        xslt.Transform(xml, outputToString); //This bit

处理文件很好也很容易，但似乎更多地涉及读取和写入字符串。我看过一些 C# 示例，但没有立即成功让它们工作，所以仍在对读者和作者进行研究！

干杯

Answer 1

我认为没有比使用XmlReader 和XmlWriter 接口更简单的方法来使用API​​。不幸的是，这很乏味，但以下应该可以解决问题：

open System.IO
open System.Text
open System.Xml
open System.Xml.Xsl

let applyXSLTransform xml (xslFile:string) =        
  let xslt = XslCompiledTransform()
  let sbuilder = StringBuilder()
  use swriter = new StringWriter(sbuilder)
  use sreader = new StringReader(xml)
  use xreader = new XmlTextReader(sreader)
  use xwriter = new XmlTextWriter(swriter)
  xslt.Load(xslFile)
  xslt.Transform(xreader, xwriter)
  sbuilder.ToString()

代码构造StringBuilder，这是一个用于构造字符串的内存对象。它将StringWriter 和XmlTextWriter 包裹起来，传递给Transform 方法。最后，您使用ToString 方法读取StringBuilder 的内容。类似的事情发生在为来自 StringReader 的数据创建 XmlTextReader，其中包含您的输入 XML。

Answer 2

这是我能想到的，尝试使用推荐的 XmlReader.Create 工厂方法而不是 .NET 1 旧版 XmlTextReader：

open System
open System.Xml.Xsl
open System.Xml
open System.IO

let transform xml xslt =
    let processor = XslCompiledTransform()

    use xsltreader = XmlReader.Create(new StringReader(xslt))

    processor.Load(xsltreader)

    use xmlreader = XmlReader.Create(new StringReader(xml))
    
    use resultwriter = new StringWriter()

    processor.Transform(xmlreader, null, resultwriter)

    resultwriter.ToString()

但我对F#没有深入了解，只是尝试将我的C#编码方式转换为F#。