Trabalhando com DataSet Desconectado

O XML (Extensible Markup Language) tem sua
estrutura simples e óbvia, por ser simplesmente um
texto estruturado (com marcação), possui um
padrão, reconhecido mundialmente e isso nos permite
trabalhar facilmente com essa tecnologia, e também
trocar informações com outros sites, independente
da tecnologia utilizada em sua estrutura (Sistema Operacional,
Servidor de páginas, Linguagem de Programação).
É muito utilizado entre instituições
financeiras.

Bem, vamos à técnica de como
podemos aplicar o DataSet desconectado. O primeiro passo é
conexão com o Banco de Dados↳Banco de dados134 conteúdosSQL ou NoSQL: eis a questão!!Data · mar 2020Banco de dados: como organizar e dar segurança para milhões de dados de loteriasData · mai 20215 serviços gratuitos na cloud para bancos de dados PostgresData · fev 2025Ver tudo em Data → como você sempre
faz e após deverá gerar o arquivo XML. Uma dica
para quem utiliza o SQL Server 2000 é utilizar o comando
"FOR XML AUTO" como por exemplo (SELECT FirstName,
LastName FROM Employees FOR XML AUTO).

Porém vamos deixar essa parte, de conexão,
leitura e geração do arquivo, que faz parte
de outro assunto e vamos direto a comunicação
com o XML.

O DataSet é o maior componente da arquitetura
ADO.NET, que guarda em memória os dados obtidos em
uma base. Consiste em uma coleção de objetos
DataTable que pode ser relacionado com outro objeto o DataRelation,
você pode também garantir a integridade das informações
utilizando os objetos UniqueConstraint e ForeignKeyConstraint.

Declare o DataSet
Dim ds As New DataSet()

Carrega o DataSet com os dados do arquivo XML.

MapPath Informa o caminho virtual especificado a um caminho
físico.
ds.ReadXml(HttpContext.Current.Server.MapPath("../temp/ConfigNivelAcesso.xml"))

Cria uma Linha de Dados / Data Row, O Objeto
DataRow representa uma linha de dados (registro) em um DataTable.
Dim RowsUsuario As DataRow()

Seleciona o(s) registro(s) que será(ão)
utilizado(s), carregando o DataRow .
RowsUsuario = ds.Tables(0).Select("tabela=’CLIENTE’
and tipopwd = 53")

Para obter o conteúdo, referência
a Linha 1 coluna incluir, do DataRow.
RowsUsuario(0)("incluir")

Abaixo o código por completo.

‘ Carrega o DataSet
ds.ReadXml(HttpContext.Current.Server.MapPath("ConfigNivelAcesso.xml"))

‘ cria uma Linha
de Dados / Data Row
Dim RowsUsuario As DataRow()
RowsUsuario = ds.Tables(0).Select("tabela=’CLIENTE’ and
tipopwd = 53")

‘ Verifica se a conteúdo
If DtRow.Length > 0 Then
pnIncluir = RowsUsuario(0)("incluir")
pnalterar = RowsUsuario(0)("alterar")
pnativar = RowsUsuario(0)("ativar")
pnexcluir = RowsUsuario(0)("excluir")
End If

Abaixo o arquivo XML (ConfigNivelAcesso.xml)

<?xml version="1.0"
encoding="ISO-8859-1" standalone="yes"
?>
<Config_tipo_Acesso>
<registro>
<tabela>CLIENTE</tabela>
<tipopwd>53</tipopwd>
<incluir>1</incluir>
<alterar>1</alterar>
<ativar>1</ativar>
<excluir>0</excluir>
</registro>
<registro>
<tabela>PEDIDOS</tabela>
<tipopwd>53</tipopwd>
<incluir>1</incluir>
<alterar>1</alterar>
<ativar>1</ativar>
<excluir>0</excluir>
</registro>
</Config_tipo_Acesso>

Para saber mais sobre XML, consulte os sites
abaixo

http://www.w3.org/XML/
http://msdn.microsoft.com/xml/

Saiba mais sobre cache nesse artigo de Mauro
Sant’Anna
http://www.msdn.com.br/tecnologias/aspnet_cache.aspx