Galera,

Vamos aprender na prática algumas das funções básicas para criação e manipulação de XML.

Neste post não irei explicar a parte teórica, mas deixo como sugestão o link http://www.w3schools.com/xml/default.asp.

Vamos começar?!

Para isso vamos criar um projeto WEB (menu File – New Project – WEB – ASP.NET Empty Web Application) com o nome ManipulandoXML_VBNET.

Adicionaremos uma página chamada Default (com o botão direito do mouse em ManipulandoXML_VBNET – opção ADD – New Item – Web Form).

Vamos codificar?!

Default.aspx (listagem 1 em VB.NET com comentários explicando o que cada linha faz)

'namespace para trabalhar com XML
Imports System.Xml

'namespace para acesso ao SQL Server
Imports System.Data.SqlClient

Partial Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        'criaremos uma variável do tipo DataTable
        Dim objRetorno As New DataTable

        'receberá os dados do banco
        objRetorno = PreencherDados()

        'criaremos um documento XML
        Dim xmlAluno As New XmlDocument

        'vamos criar uma variável do tipo XmlNode para criarmos os elementos (nó) do documento xml
        Dim node As XmlNode

        'criaremos nosso nó raiz no documento XML
        xmlAluno.LoadXml("")

        For i As Integer = 0 To objRetorno.Rows.Count - 1

            'incluiremos o nó (Nome) dentro do nó raiz (Aluno)

            'criando um nó chamado Nome
            node = xmlAluno.CreateElement("Nome")
            'atribuido valor ao nó Nome
            node.InnerText = objRetorno.Rows(i)("nome").ToString()
            'adicionando o nó dentro no nó Aluno
            xmlAluno.SelectSingleNode("/Aluno").AppendChild(node)

            'incluiremos o nó (Nome) dentro do nó raiz (Profissao)

            'criando um nó chamado Profissao
            node = xmlAluno.CreateElement("Profissao")
            'atribuido valor ao nó Profissao
            node.InnerText = objRetorno.Rows(i)("profissao").ToString()
            'adicionando o nó dentro no nó Aluno
            xmlAluno.SelectSingleNode("/Aluno").AppendChild(node)

        Next

        'salvando o xml informando o local e o nome
        xmlAluno.Save("C:\Users\Fernanda Sallai\Desktop\xml\fernanda.xml")

        'carregando um XML já existente
        xmlAluno.Load("C:\Users\Fernanda Sallai\Desktop\xml\fernanda.xml")

        'InnerXml e OuterXml

        'ambos mostram a estrutura completa do XML (figura 1)

        MsgBox(xmlAluno.InnerXml)
        MsgBox(xmlAluno.OuterXml)

        'Porém se diferenciam quando selecionamos a partir de um nó.

        'OuterXml -> traz o nó aluno e o que tem dentro dele (figura 2)
        MsgBox(xmlAluno.SelectSingleNode("/Aluno").OuterXml)

        'InnerText -> traz só o que está dentro do nó aluno (figura 3)
        MsgBox(xmlAluno.SelectSingleNode("/Aluno").InnerXml)

    End Sub

    '''
<summary> ''' Método para trazer os dados do banco
 ''' </summary>
    ''' Dados encontrados
    Function PreencherDados() As DataTable

        Dim objConexao As New SqlClient.SqlConnection
        Dim objAdapter As New SqlClient.SqlDataAdapter
        Dim resultado As New DataTable

        objConexao.ConnectionString = "Data Source=nomeDoServidor;Integrated Security=True"
        objConexao.Open()

        objAdapter.SelectCommand = New SqlCommand
        objAdapter.SelectCommand.Connection = objConexao
        objAdapter.SelectCommand.CommandType = CommandType.Text

        objAdapter.SelectCommand.CommandText = "SELECT nome,profissao FROM Estudos..Alunos"
        objAdapter.Fill(resultado)

        Return resultado

    End Function

End Class

Listagem 1 – Codificação em VB.NET.

Default.aspx (listagem 2 em C# com comentários explicando o que cada linha faz)

using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Data;

//namespace para trabalhar com XML
using System.Xml;

//namespace para acesso ao SQL Server
using System.Data.SqlClient;

namespace ManipulandoXML_CSharp
{
    public partial class Default : System.Web.UI.Page
    {
        protected void Page_Load(object sender, EventArgs e)
        {
            //criaremos uma variável do tipo DataTable
            DataTable objRetorno = new DataTable();

            //receberá os dados do banco
            objRetorno = PreencherDados();

            //criaremos um documento XML
            XmlDocument xmlAluno = new XmlDocument();

            //vamos criar uma variável do tipo XmlNode para criarmos os elementos (nó) do documento xml
            XmlNode node;

            //criaremos nosso nó raiz no documento XML
            xmlAluno.LoadXml("");

            for (int i = 0; i < objRetorno.Rows.Count - 1; i++)
			    {
			        //incluiremos o nó (Nome) dentro do nó raiz (Aluno)

                    //criando um nó chamado Nome
                    node = xmlAluno.CreateElement("Nome");
                    //atribuido valor ao nó Nome
                    node.InnerText = objRetorno.Rows[i].ItemArray[0].ToString();
                    //adicionando o nó dentro no nó Aluno
                    xmlAluno.SelectSingleNode("/Aluno").AppendChild(node);

                    //incluiremos o nó (Nome) dentro do nó raiz (Profissao)

                    //criando um nó chamado Profissao
                    node = xmlAluno.CreateElement("Profissao");
                    //atribuido valor ao nó Profissao
                    node.InnerText = objRetorno.Rows[i].ItemArray[1].ToString();
                    //adicionando o nó dentro no nó Aluno
                    xmlAluno.SelectSingleNode("/Aluno").AppendChild(node);
			    }

                //salvando o xml informando o local e o nome
                xmlAluno.Save("C:\\Users\\Fernanda Sallai\\Desktop\\xml\\fernanda.xml");

                //carregando um XML já existente
                xmlAluno.Load("C:\\Users\\Fernanda Sallai\\Desktop\\xml\\fernanda.xml");

                //InnerXml e OuterXml

                //ambos mostram a estrutura completa do XML (figura 1)
Page.RegisterStartupScript("", "<script type="text/javascript">// <![CDATA[
 alert('" + xmlAluno.InnerXml + "');
// ]]></script>");

Page.RegisterStartupScript("", "<script type="text/javascript">// <![CDATA[
 alert('" + xmlAluno.OuterXml + "');
// ]]></script>");

                //Porém se diferenciam quando selecionamos a partir de um nó.

                //OuterXml -> traz o nó aluno e o que tem dentro dele (figura 2)
Page.RegisterStartupScript("", "<script type="text/javascript">// <![CDATA[
 alert('" + xmlAluno.SelectSingleNode("/Aluno").OuterXml + "');
// ]]></script>");

                //InnerText -> traz só o que está dentro do nó aluno (figura 3)
Page.RegisterStartupScript("", "<script type="text/javascript">// <![CDATA[
 alert('" + xmlAluno.SelectSingleNode("/Aluno").InnerXml + "');
// ]]></script>");
        }

        private DataTable PreencherDados()
        {

            SqlConnection objConexao = new SqlConnection();

 	        SqlDataAdapter objAdapter = new SqlDataAdapter();

            DataTable resultado = new DataTable();

            objConexao.ConnectionString = "Data Source=nomeDoServidor;Integrated Security=True";

            objConexao.Open();

            objAdapter.SelectCommand = new SqlCommand();
            objAdapter.SelectCommand.Connection = objConexao;
            objAdapter.SelectCommand.CommandType = CommandType.Text;

            objAdapter.SelectCommand.CommandText = "SELECT nome,profissao FROM Estudos..Alunos";
            objAdapter.Fill(resultado);

            return resultado;
        }
    }
}

Listagem 2 – Codificação em C#.

A figura 1 mostra como InnerXml e OuterXml exibem o XML, como foi descrito nos códigos em C# e VB.NET.

Figura 1 – Mostrando a estrutura do XML.

As figuras 2 e 3 mostram a diferença como InnerXml e OuterXml exibem o XML a partir de um nó selecionado, como foi descrito nos códigos em C# e VB.NET.

Figura 2 – Usando o InnerXml a partir de um nó selecionado.

Figura 3 – Usando o OuterXml a partir de um nó selecionado.

Banco de Dados

Não irei entrar nos detalhes de banco de dados, mas como nesse post eu acesso o banco para trazer os dados, eu disponibilizarei os scripts caso queiram criar o banco e a tabela que utilizo.

Primeiro criei um banco de dados chamado “Estudos”. Para criá-lo clique com o botão direito do mouse em cima de DataBases – item New Database e após informar no campo Database name o nome “Estudos” e clique no botão OK.

Na listagem 3 é exibido o script para gerar a tabela Alunos.

USE [Estudos]
GO
/****** Object:  Table [dbo].[Alunos]    Script Date: 01/08/2012 15:46:17 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_PADDING ON
GO
CREATE TABLE [dbo].[Alunos](
	[ID] [int] IDENTITY(1,1) NOT NULL,
	[Nome] [varchar](100) NOT NULL,
	[Profissao] [varchar](100) NOT NULL,
 CONSTRAINT [PK_Alunos] PRIMARY KEY CLUSTERED
(
	[ID] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]
GO
SET ANSI_PADDING OFF
GO

Listagem 3 – Script da criação da tabela Alunos.

A listagem 4 contém script para inserçao de dois registros na tabela Alunos.

INSERT INTO alunos (nome, profissao) VALUES ('Fernanda Sallai','analista de sistemas')

Listagem 4 – Script da inserção de dados na tabela Alunos.

Viu como não é tão dificil manipular XML ?!

Projeto disponível em VB.NET: Manipulando XML em VBNET e em C#: Manipulando XML em C#