Como: transformar o XML usando o LINQ (Visual Basic)

Artigo
02/25/2013

Literais XML (Visual Basic) torna fácil ler XML de uma fonte e transfomá-lo num novo formato de XML.Você pode aproveitar consultas LINQ para recuperar o conteúdo a transformar, ou alterar contexto num documento existente para um novo formato XML.

O exemplo neste tópico transforma conteúdo de um documento-fonte XML num HTML a ser visto num navegador.

Observação
Seu computador pode mostrar nomes ou locais diferentes para alguns dos elementos da interface do usuário do Visual Studio nas instruções a seguir. A edição do Visual Studio que você possui e as configurações que você usa determinam esses elementos. Para obter mais informações, consulte Configurações de Visual Studio.

Para transformar um documento XML

No Visual Studio, crie um novo projeto Visual Basic no modelo de projeto Aplicativo Console.

Dê um clique duplo no arquivo Module1.vb criado no projeto para modificar o código Visual Basic.Adicione o seguinte código ao Sub Main do módulo Module1.Este código cria o documento XML fonte como um objeto XDocument.

Dim catalog = 
  <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
        <Description>
          An in-depth look at creating applications
          with <technology>XML</technology>. For 
          <audience>beginners</audience> or 
          <audience>advanced</audience> developers.
        </Description>
      </Book>
      <Book id="bk331">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
        <Description>
          Get the expert insights, practical code samples, 
          and best practices you need 
          to advance your expertise with <technology>Visual 
          Basic .NET</technology>. 
          Learn how to create faster, more reliable applications
          based on professional, 
          pragmatic guidance by today's top <audience>developers</audience>.
        </Description>
      </Book>
    </Catalog>

Como: carregar XML de um arquivo, uma seqüência de caracteres ou um fluxo (Visual Basic).

Após o código criar o documento XML fonte, adicione o código a seguir para recuperar todos os elementos <Book> do objeto e transforme-os num documento HTML.A lista de elementos <Book> é criada usando uma consulta LINQ que retorna uma coleção de objetos XElement que contém o HTML transformado.Você pode usar expressões embutidas para pôr valores do documento fonte no novo formato XML.

O documento HTML resultante é gravado num arquivo usando o método Save.

Dim htmlOutput = 
  <html>
    <body>
      <%= From book In catalog.<Catalog>.<Book> 
          Select <div>
                   <h1><%= book.<Title>.Value %></h1>
                   <h3><%= "By " & book.<Author>.Value %></h3>
                    <h3><%= "Price = " & book.<Price>.Value %></h3>
                    <h2>Description</h2>
                    <%= TransformDescription(book.<Description>(0)) %>
                    <hr/>
                  </div> %>
    </body>
  </html>

htmlOutput.Save("BookDescription.html")

Após Sub Main de Module1, adicione um novo método (Sub) para transformar um nó <Description> no formato HTML especificado.Este método é chamado pelo código no passo anterior e é usado para preservar o formato de elementos <Description>.

Este método substitui subelementos do elemento <Description> com HTML.O método ReplaceWith é usado para preservar a localização de subelementos.O conteúdo transformado do elemento <Description> está incluído num elemento de parágrafo () HTML.A propriedade Nodes é usada para recuperar o conteúdo transformado do elemento <Description>.Isto assegura que subelementos são incluídos no conteúdo transformado.

Adicione o seguinte código após Sub Main de Module1.
```
Public Function TransformDescription(ByVal desc As XElement) As XElement

 ' Replace <technology> elements with .
 Dim content = (From element In desc...<technology>).ToList()

 If content.Count > 0 Then
 For i = 0 To content.Count - 1
 content(i).ReplaceWith(<%= content(i).Value %>)
 Next
 End If

 ' Replace <audience> elements with .
 content = (From element In desc...<audience>).ToList()

 If content.Count > 0 Then
 For i = 0 To content.Count - 1
 content(i).ReplaceWith(<%= content(i).Value %>)
 Next
 End If

 ' Return the updated contents of the <Description> element.
 Return <%= desc.Nodes %>
End Function
```
Salve suas alterações.

Pressione F5 para executar o código.O documento salvo resultante vai parece-se com o seguinte:

<?xml version="1.0"?>
<html>
  <body>
    <div>
      <h1>XML Developer's Guide</h1>
      <h3>By Garghentini, Davide</h3>
      <h3>Price = 44.95</h3>
      <h2>Description</h2>
      <p>
        An in-depth look at creating applications
        with <b>XML</b>. For 
        <i>beginners</i> or 
        <i>advanced</i> developers.
      </p>
      <hr />
    </div>
    <div>
      <h1>Developing Applications with Visual Basic .NET</h1>
      <h3>By Spencer, Phil</h3>
      <h3>Price = 45.95</h3>
      <h2>Description</h2>
      <p>
        Get the expert insights, practical code 
        samples, and best practices you need 
        to advance your expertise with <b>Visual 
        Basic .NET</b>. Learn how to create faster,
        more reliable applications based on
        professional, pragmatic guidance by today's 
        top <i>developers</i>.
      </p>
      <hr />
    </div>
  </body>
</html>

Consulte também

Compartilhar via

Como: transformar o XML usando o LINQ (Visual Basic)

Para transformar um documento XML

Consulte também

Tarefas

Conceitos

Outros recursos

Recursos adicionais