Com o avanço da informática, cada vez mais as empresas integram seus dados e utilizam de várias maneiras e mais tradicional de todas é o arquivo texto. O arquivo texto é usado desde o começo da informática, sendo muitas vezes o colunado e com separador, com vírgulas, ponto e vírgula, tabulação, etc.
Com o advendo da internet, o XML trouxe uma melhoria muito grande neste processo. Usando o VB é possível gerar e ler arquivos XML com muito facilidade.
Abaixo um fragmento de um código para ler a tabela Clientes e depois salvar todo seu conteúdo no arquivo "clientes.xml":
sSql = "select * from clientes"
If rsCli.State = adStateOpen Then rsCli.Close
rsCli.Open sSql, db
If Not rsCli.EOF Then
rsCli.Save "c:\temp\Clientes.xml", adPersistXML
End If
Para ler um arquivo:
If rsCli.State = adStateOpen Then rsCli.Close
rsCli.Open "c:\temp\Clientes.xml"
Depois é só adaptar o seu programa para suas necessidades.
Com pouco de código é possível usar esta excelente tecnologia para trocar de informações.
