Como transformar XML usando LINQ (Visual Basic)
Os literais XML facilitam a leitura de XML de uma fonte e o transformam em um novo formato XML. Você pode aproveitar as consultas LINQ para recuperar o conteúdo a ser transformado ou alterar o conteúdo de um documento existente para um novo formato XML.
O exemplo neste tópico transforma o conteúdo de um documento de origem XML em HTML para ser exibido em um navegador.
Nota
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ê tem e as configurações que você usa determinam esses elementos. Para obter mais informações, consulte Personalizando o IDE.
Para transformar um documento XML
No Visual Studio, crie um novo projeto do Visual Basic no modelo de projeto Aplicativo de Console.
Clique duas vezes no arquivo de Module1.vb criado no projeto para modificar o código do Visual Basic. Adicione o seguinte código ao
Sub Main
Module1
do módulo. Este código cria o documento XML de origem como um XDocument objeto.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, cadeia de caracteres ou fluxo.
Após o código para criar o documento XML de origem, adicione o código a seguir para recuperar todos os <elementos Book> do objeto e transformá-los em um documento HTML. A lista de <elementos Book> é criada usando uma consulta LINQ que retorna uma coleção de objetos que contêm o HTML transformado XElement . Você pode usar expressões incorporadas para colocar os valores do documento de origem no novo formato XML.
O documento HTML resultante é gravado em um arquivo usando o Save método.
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")
Depois
Sub Main
deModule1
, adicione um novo método (Sub
) para transformar um <nó Descrição> no formato HTML especificado. Esse método é chamado pelo código na etapa anterior e é usado para preservar o <formato dos elementos Description> .Esse método substitui subelementos <do elemento Description> por HTML. O
ReplaceWith
método é usado para preservar a localização dos subelementos. O conteúdo transformado do <elemento Description> é incluído em um elemento HTML parágrafo (<p>). A Nodes propriedade é usada para recuperar o conteúdo transformado do <elemento Description> . Isso garante que os subelementos sejam incluídos no conteúdo transformado.Adicione o seguinte código após
Sub Main
Module1
.Public Function TransformDescription(ByVal desc As XElement) As XElement ' Replace <technology> elements with <b>. Dim content = (From element In desc...<technology>).ToList() If content.Count > 0 Then For i = 0 To content.Count - 1 content(i).ReplaceWith(<b><%= content(i).Value %></b>) Next End If ' Replace <audience> elements with <i>. content = (From element In desc...<audience>).ToList() If content.Count > 0 Then For i = 0 To content.Count - 1 content(i).ReplaceWith(<i><%= content(i).Value %></i>) Next End If ' Return the updated contents of the <Description> element. Return <p><%= desc.Nodes %></p> End Function
Guardar as suas alterações.
Pressione F5 para executar o código. O documento salvo resultante será semelhante ao 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>