0

私はまだxmlで遊んでいます。今、私は次のようなファイルを持っています:

<?xml version="1.0" encoding="utf-8"?>
<Attributes>
 <AttributeSet id="10110">
  <Attribute id="1">some text here</Attribute>
  <Attribute id="2">some text here</Attribute>
  <!-- 298 more Attribute nodes follow -->
  <!-- note that the value for the id attribute is numbered consecutively -->
 </AttributeSet>
</Attributes>

合計 300 個の属性ノードがあり、そのほとんどは必要ありません。私がやりたいのは、id 属性に指定された値を持たないすべての属性ノードを削除することです。約 10 個の値を持つ文字列配列を作成しました。これらの値は、xml に保持したい属性を表しています。残りは削除したいと思います。

以下のコードでやろうとしているのは、使用したくないすべての属性ノードを削除して xml を変更することです。

Dim ss() As String = New String() {"39", "41", "38", "111", "148", "222", "256", "270", "283", "284"} 'keep the Attributes whose id value is one of these numbers
Dim rv As New List(Of String)'will hold Attribute ids to remove
Dim bool As Boolean = False
For Each x As XElement In doc...<eb:Attribute>
 For Each s As String In ss
  If x.@id = s Then
   bool = True
   Exit For
  End If
 Next
 If bool = True Then
  'do nothing
 Else 'no attribute matched any of the attribute ids listed mark xelement for removal
  rv.Add(x.@id)
 End If
Next
'now remove the xelement
For Each tr As String In rv
 Dim h As String = tr
 doc...<eb:Attribute>.Where(Function(g) g.@id = h).Remove()
Next
'save the xml
doc.Save("C:\myXMLFile.xml")

何らかの理由で、私のコードが機能しません。不要な属性ノードは削除されません。

どうしたの?ID 属性値が文字列配列のどの数値とも一致しない属性ノードを削除するにはどうすればよいですか?

前もって感謝します。

PS - 私の問題を説明する際に、自分自身を明確にしていただければ幸いです。

4

2 に答える 2

0

どうでも。私はそれを考え出した。ここで私がしたこと:

For Each x As XElement In doc...<eb:Attribute>
 **bool = False 'I simply added this line of code and everything worked perfectly**
 For Each s As String In ss
  If x.@id = s Then
   bool = True
   Exit For
  End If
 Next
 If bool = True Then
  'do nothing
 Else 'no attribute matched any of the attribute ids listed so remove the xelement
  rv.Add(x.@id)
 End If
Next
于 2009-03-06T23:05:13.947 に答える
0

不要なノードをすべて削除します。

XDocument xDoc = XDocument.Load(xmlFilename);

List<string> keepList = new List<string> { "1", "2", "3" };

var unwanted = from element in xDoc.Elements("Attributes").Elements("AttributeSet").Elements("Attribute")
               where !keepList.Contains((string)element.Attribute("id"))
               select element;

unwanted.Remove();

xDoc.Save(xmlFilename);
于 2012-04-27T06:27:29.083 に答える