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

    [Resolvido]Classe para criar arquivo XML

    avatar
    MSoccol
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 74
    Registrado : 24/03/2011

    [Resolvido]Classe para criar arquivo XML Empty Classe para criar arquivo XML

    Mensagem  MSoccol 1/9/2011, 15:32

    Bom dia

    Preciso criar um arquivo XML com dados do meu banco de dados, estudando na internet, vi a classe XMLTextWriter para o VB. Achei bem interessante e fácil de trabalhar.

    A pergunta é, como "ativo" essa classe no VBA, ou existe outra classe equivalente a ela para o VBA?

    OBS: me falta a teoria sobre, classes, objetos, namespaces etc, logo posso estar trocando o lugar de alguns desses termos.

    avatar
    Convidado
    Convidado


    [Resolvido]Classe para criar arquivo XML Empty Re: [Resolvido]Classe para criar arquivo XML

    Mensagem  Convidado 1/9/2011, 23:19

    Veja este tópico...
    Nele eu exportei um relatório em XML

    http://maximoaccess.forumeiros.com/t4015-resolvidogerar-arquivo-xml

    Este cria um XML atraves de códigos
    Código:

    ' and saves it to disk.
    ' Requires msxml.dll (Go to Project --> References and
    ' and choose Microsoft XML version 2.0, or whatever the
    ' current version you have installed)
    ' The example given below will write the following XML
    ' documents.
    '
    ' <Family>
    '    <Member Relationship="Father">
    '      <Name>Some Guy</Name>
    '    </Member>
    ' </Family>
    '
    'but it should be clear how to modify the code
    'to create your own documents
     
    Private Sub Create_XML()
       
      Dim objDom As DOMDocument
      Dim objRootElem As IXMLDOMElement
      Dim objMemberElem As IXMLDOMElement
      Dim objMemberRel As IXMLDOMAttribute
      Dim objMemberName As IXMLDOMElement
       
      Set objDom = New DOMDocument
       
      ' Creates root element
      Set objRootElem = objDom.createElement("Family")
      objDom.appendChild objRootElem
       
      ' Creates Member element
      Set objMemberElem = objDom.createElement("Member")
      objRootElem.appendChild objMemberElem
       
      ' Creates Attribute to the Member Element
      Set objMemberRel = objDom.createAttribute("Relationship")
      objMemberRel.nodeValue = "Father"
      objMemberElem.setAttributeNode objMemberRel
       
      ' Create element under Member element, and
      ' gives value "some guy"
      Set objMemberName = objDom.createElement("Name")
      objMemberElem.appendChild objMemberName
      objMemberName.Text = "Some Guy"
     
      ' Saves XML data to disk.
      objDom.Save ("c:\temp\andrew.xml")
    End Sub

    Saudações
    avatar
    MSoccol
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 74
    Registrado : 24/03/2011

    [Resolvido]Classe para criar arquivo XML Empty Re: [Resolvido]Classe para criar arquivo XML

    Mensagem  MSoccol 2/9/2011, 12:43

    Bastante interessante. Estou usando o exemplo acima, com a classe DOMDocument. Voce sabe por acaso como insiro aquela primeira linha do arquivo XML?
    avatar
    MSoccol
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 74
    Registrado : 24/03/2011

    [Resolvido]Classe para criar arquivo XML Empty Re: [Resolvido]Classe para criar arquivo XML

    Mensagem  MSoccol 2/9/2011, 12:59

    Percebi, que teria que declarar todas tags do meu XML, então tirei a Opção Option Explicit do meu módulo. o Quanto isso pode afetar meu módulo neste caso?
    avatar
    Convidado
    Convidado


    [Resolvido]Classe para criar arquivo XML Empty Re: [Resolvido]Classe para criar arquivo XML

    Mensagem  Convidado 2/9/2011, 13:55

    Amigao.. não tenho muita experiencia com XML apenas tentei ajudar um colega do fórum e consegui este resultado..

    Cumprientos
    avatar
    MSoccol
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 74
    Registrado : 24/03/2011

    [Resolvido]Classe para criar arquivo XML Empty Re: [Resolvido]Classe para criar arquivo XML

    Mensagem  MSoccol 2/9/2011, 14:37

    Valeu, vou aguardar outras sugestões, mas muito obrigado.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Classe para criar arquivo XML Empty Re: [Resolvido]Classe para criar arquivo XML

    Mensagem  vieirasoft 21/9/2011, 17:20

    Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.

    Conteúdo patrocinado


    [Resolvido]Classe para criar arquivo XML Empty Re: [Resolvido]Classe para criar arquivo XML

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 12:39