1

VB.netを使用してXMLファイルを書き出しています。最初の要素を超えて書き込まれる別の要素を作成しようとすると、次のようにエラーが発生します。

「状態EndRootElementのトークンStartElementは、無効なXMLドキュメントになります。XMLフラグメントを書き込む場合は、ConformanceLevel設定がConformanceLevel.FragmentまたはConformanceLevel.Autoに設定されていることを確認してください。」

前の要素が閉じられていることを考えると、なぜこれを行っているのかわかりません。writer.WriteEndRootElementを探しましたが、そこには何も表示されませんでした。それを機能させるための提案はありますか？=）

    Private Sub writeXMLFile(ByVal childform As Fone_Builder_Delux.frmData, ByVal filename As String)

        Dim xmlSettings As New XmlWriterSettings()
        xmlSettings.Indent = True
        xmlSettings.NewLineOnAttributes = True

        Using writer As XmlWriter = XmlWriter.Create(filename, xmlSettings)

            writer.WriteStartDocument()
            writer.WriteStartElement("header")

            writer.WriteStartAttribute("filepath")
            writer.WriteValue(filename)
            writer.WriteEndAttribute()

            writer.WriteEndElement()
            writer.WriteStartElement("variable")
            writer.WriteStartAttribute("varName")

            writer.WriteValue(childform.datagridHeaders.Item(0, 1))

            writer.WriteEndAttribute()
            writer.WriteEndElement()
            writer.WriteEndDocument()
            writer.Flush()

        End Using


    End Sub
4

2 に答える 2

6

XMLドキュメントはルート要素を1つだけ持つことができます。ドキュメントを開始し、「header」要素を記述し、「header」要素を閉じてから、新しい「変数」要素（2番目のルート要素）を開始します。

「ヘッダー」と「変数」の両方を単一の上位レベルの要素で囲むか、一方を他方の内部に移動します。

于 2009-10-23T04:39:41.220 に答える
1

このようなものを試すことができます

 Private Sub writeXMLFile(ByVal childform As Fone_Builder_Delux.frmData, ByVal filename As String)

    Dim xmlSettings As New XmlWriterSettings()
    xmlSettings.Indent = True
    xmlSettings.NewLineOnAttributes = True

    Using writer As XmlWriter = XmlWriter.Create(filename, xmlSettings)

        writer.WriteStartDocument()
        writer.WriteStartElement("root")
        writer.WriteStartElement("header")

        writer.WriteStartAttribute("filepath")
        writer.WriteValue(filename)
        writer.WriteEndAttribute()

        writer.WriteEndElement()
        writer.WriteStartElement("variable")
        writer.WriteStartAttribute("varName")

        writer.WriteValue(childform.datagridHeaders.Item(0, 1))

        writer.WriteEndAttribute()
        writer.WriteEndElement()
        writer.WriteEndElement()
        writer.WriteEndDocument()
        writer.Flush()

    End Using


End Sub
于 2009-10-23T04:52:52.863 に答える