Comment insérer un peu de XML dans un XDocument à l'aide de Visual Basic?

Question

J'essaie de créer un sitemap dans un projet ASP.NET MVC.

Ce code dans mon contrôleur de noeud ...

Function Sitemap() As ContentResult
    Dim db As New EfrDotOrgEntities
    Dim Nodes = db.Node.ToList
    Dim RequestUrl As Uri = Url.RequestContext.HttpContext.Request.Url
    Dim AbsoluteRoot As String = String.Format("{0}://{1}", RequestUrl.Scheme, RequestUrl.Authority)

    Dim map As XDocument = <?xml version="1.0" encoding="UTF-8"?>
                           <urlset xmlns="http://www.sitemaps.org/schemas/sitemap/0.9">
                           </urlset>
    For Each n As Node In Nodes
        map.Add(<url>
                    <loc><%= AbsoluteRoot + Url.RouteUrl("IdOnly", New With {.id = n.Id}) %></loc>
                </url>)
    Next
    Return Content(map.ToString, "text/xml", Encoding.UTF8)
End Function

(voici une image parce que Stack Overflow ne colore pas bien le code VB)

... produit cette erreur:

  

Cette opération créerait un   document mal structuré.

Il ne saurait pas où ajouter ce contenu.

Comment puis-je lui dire d'insérer ce bit XML dans le <urlset>?

Answer 1

Vous devez l'ajouter à l'élément de niveau supérieur du document (la racine):

map.Root.Add(...)

Answer 2

Pourquoi ne pas le remplir complètement avec un autre trou littéral xml?

Dim map As XDocument = <?xml version="1.0" encoding="UTF-8"?>
                       <urlset xmlns="http://www.sitemaps.org/schemas/sitemap/0.9">
                           <%= From n In Nodes.Cast(Of Node)() _
                               Select <url>
                                          <loc><%= AbsoluteRoot + Url.RouteUrl("IdOnly", New With {.id = n.Id}) %></loc>
                                      </url> %>
                       </urlset>