MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    criar comando para exportar dados em XML

    avatar
    palcobia
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 6
    Registrado : 20/06/2017

    criar comando para exportar dados em XML Empty criar comando para exportar dados em XML

    Mensagem  palcobia 4/12/2019, 15:14

    Boa tarde a todos,

    Gostaria de saber se existe alguma forma de exportar os campos de uma tabela ou consulta em XML.
    A ideia seria criar um botão com um evento, que vai buscar os dados como por exemplo: (cliente, morada, cidade)...e exportar para XML capaz de ser guardado na área local.
    avatar
    renpv
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    criar comando para exportar dados em XML Empty Re: criar comando para exportar dados em XML

    Mensagem  renpv 11/12/2019, 00:19

    É perfeitamente possível. Nesse caso você pode criar uma consulta com os campos e dados a serem exportados e usar um comando VBA para exportar.

    Pra facilitar, crie um botão e no evento OnClick inclua o seguinte código

    Código:
    Application.ExportXML acExportQuery, "conExportarXML", Application.CurrentProject.Path & "\consultaExportada.xml"

    Lembro que pra executar o comando acima você precisa criar uma consulta e dar o nome de conExportarXML.

    O comando acima vai salvar um arquivo XML na pasta onde o arquivo do access está gravado.

    Dá pra fazer muito mais coisas como deixar o usuário escolher a pasta e o nome do arquivo no momento da exportação, criar filtros pra exportar apenas os dados necessários, etc.

    Espero ter ajudado.
    avatar
    palcobia
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 6
    Registrado : 20/06/2017

    criar comando para exportar dados em XML Empty Re: criar comando para exportar dados em XML

    Mensagem  palcobia 11/12/2019, 10:29

    Obrigado pela dica, deu perfeitamente e ainda complementei com a abertura da sua localização no final desta forma:

    Código:
    Application.exportXML acExportQuery, "conExportarXML", "C:\pastadoprograma\" & "\50000teste.xml"

      Dim resultado As VbMsgBoxResult
        resultado = MsgBox("XML - Exportado Com Sucesso...", vbOKOnly, "Alerta")
        Shell "C:\WINDOWS\explorer.exe """ & "C:\pastadoprograma\" & "", vbNormalFocus


    Agora tenho outro problema na versão do XML, que actualmente aparece desta forma:
    Estas são as duas primeiras linhas:

    Código:
    <?xml version="1.0" encoding="UTF-8"?>
    <dataroot xmlns:od="urn:schemas-microsoft-com:officedata" generated="2019-12-11T10:20:08">

    Como é que posso fazer aparecer assim:

    Código:
    <?xml version="1.0" encoding="windows-1252"?>
    <AuditFile xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="urn:OECD:StandardAuditFile-Tax:1.03_01">

    esta é a forma como terá de ser apresentado, aguardo feedback.
    pois este ficheiro será submetido em um validador SAF-T e tem de estar em conformidade.


    avatar
    renpv
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    criar comando para exportar dados em XML Empty Re: criar comando para exportar dados em XML

    Mensagem  renpv 11/12/2019, 12:16

    Veja se esse artigo ajuda

    http://www.brileigh.com/microsoft-access/export-xml-data-from-microsoft-access-part-3-matching-a-schema/

    Conteúdo patrocinado


    criar comando para exportar dados em XML Empty Re: criar comando para exportar dados em XML

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 11:56