<IS_ID>
<PROPERTIES SOURCE="Correction" USER="123@xyz.com" DATE="14-Sep-2012 15:47:27" />
<HEADER Action='Update' />
<HEADER EMO_ID="12503652" />
<HEADER SourceResolutionID="JT-362" />
<DETAIL Type=Cumulative/Service Pack/Patch Release />
<DETAIL Language=English />
<DETAIL ServicePack="11" />
<DETAIL ExternalDefectID=FIN-17243 />
<DETAIL ResolutionID=JT_1239 />
<DETAIL Classification=M3 Applications />
</IS_ID>
以下のコードを使用してプロパティを変換できますが、要素ごとに終了タグがString
あるため、同じことは機能しません。この問題を解決するにはどうすればよいですか?HEADER
DETAIL
Dim sbProperties As New System.Text.StringBuilder
sbProperties.Append("<PROPERTIES>")
If Not xmlAttributes Is Nothing Then
For Each xmlAttribute In xmlAttributes
sbProperties.Append("<" & xmlAttribute.Name.ToUpper & ">" & xmlAttribute.Value & "</" & xmlAttribute.Name.ToUpper & ">")
Next
sbProperties.Append("</PROPERTIES>")
Dim strProperties As String = sbProperties.ToString
End If