这是我在寻找的东西:

  
    16533
    17018
    1/1/2011 12:00:00 AM
    1/31/2011 12:00:00 AM
  
  
    16099
    17018
    1/1/2011 12:00:00 AM
    1/31/2011 12:00:00 AM
  

    
      
        16533
        17018
        1/1/2011 12:00:00 AM
        1/31/2011 12:00:00 AM
      
    
    
      
        16677
        17018
        1/1/2011 12:00:00 AM
        1/31/2011 12:00:00 AM
      
    

type parameter(paramName, javaType, paramValue) =
    let mutable pName = paramName
    let mutable pType = javaType
    let mutable pValue = paramValue

    public new() = 
        new parameter("","","")

    []    
    member this.PName with get() = pName and set v = pName <- v

    []
    member this.PType with get() = pType and set v = pType <- v

    []
    member this.PValue with get() = pValue and set v = pValue <- v

type parameters(parameters: parameter array) =
    let mutable paramArray = parameters

    public new() = 
        new parameters(Array.empty)

    []
    member this.ParamArray with get() = paramArray and set v = paramArray <- v

[]
type reports(ps:parameters array) =
    let mutable parms = ps

    public new() =
        new reports(Array.empty)

    [] 
    member this.Ps with get() = parms and set v = parms <- v

1 Câu trả lời

好的，所以我简化了您的类型，使其看起来更简洁:

type parameter(paramName) =
   let mutable pName = paramName

   public new() = 
    new parameter("")

   []    
   member this.PName with get() = pName and set v = pName <- v


type parameters(parameters: parameter array) =
   let mutable paramArray = parameters

   public new() = 
    new parameters(Array.empty)

   []
   member this.ParamArray with get() = paramArray and set v = paramArray <- v

[]
type reports(ps:parameters array) =
   let mutable parms = ps

   public new() =
    new reports(Array.empty)

   [] 
   member this.Ps with get() = parms and set v = parms <- v

    let params1 = parameters ([|parameter("a"); parameter("b")|])
    let params2 = parameters ([|parameter("c"); parameter("d")|])

    let repos = reports ([|params1; params2|])

    use writer = System.Xml.XmlWriter.Create @"C:\temp\foo1.xml"
    let xs = System.Xml.Serialization.XmlSerializer typeof
    xs.Serialize (writer, repos)

关于f# - 如何在FSharp中以XML序列化数组的数组，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/4937811/