Gerando retorno XML com Visual Studio 2010

Pessoal,

Alguns leitores me enviaram e-mails solicitando ajuda para colocar o código do post Gerando arquivos XML com SQL Server em um aplicativo .NET e como sempre eu faço o possível para ajudar, abaixo esta o código em VB.NET.

Para criar esse código eu utilizei o Visual Studio 2010 e criei um Console Application. Para quem quiser fazer o download da versão beta é só clicar aqui, porém esse código irá rodar sem problemas no Visual Studio 2008.

Imports System.Data.SqlClient
Imports System.Xml
Module Module1

  Sub Main()
   
Dim lSQL As String = “select * from HumanResources.Department for xml auto”
   
Dim lConexao As String = “Data Source =(local); integrated security=SSPI; Initial Catalog=Adventureworks;”
   
Dim lCon As New SqlClient.SqlConnection(lConexao)
   
Dim lCmd As New SqlCommand(lSQL, lCon)
    lCon.Open()
   
Dim lrXml As XmlReader = lCmd.ExecuteXmlReader()
   
Console.WriteLine(“<?xml version=1.0 encoding=ISO-8859-1?>”)
   
Console.WriteLine(“<Departament>”)
   
While (lrXml.Read())
     
Console.WriteLine(lrXml.ReadOuterXml())
   
End While
   
Console.WriteLine(“</Departament>”)
    lrXml.Close()
 
End Sub

End Module

 

Pessoal, não preciso nem concluir não é? Muito fácil, mas se houver alguma dúvida é só pedir.

Abraço, Rodrigo

Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s