xml-como criar


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: xml-como criar

moncerra

SÃO PAULO
SP - BRASIL

ENUNCIADA !

Postada em 12/07/2008 17:04 hs

Boa tarde a Todos.

Gente como criar um xml no vb onde eu possa alterar excluir e incluir um novo item ( na tag).
Ao clicar em um botao este xml seria criado.
Estrutura:

<Relacao_de_empresa>
<empresa>
<nome>Getronics</nome>
<email>gtronics.com.br</email>
<data>12/07/2008</data>
</empresa>

<empresa>
<nome>Getronics</nome>
<email>gtronics.com.br</email>
<data>12/07/2008</data>
</empresa>

</Relacao_de_empresa>

Mas uma Duvida:

È POSSIVEL CARREGAR UM DATAGRID OU FLEXGRID COM UMA ARRAY OU XML'

Treze

SÃO VICENTE
SP - BRASIL

ENUNCIADA !

Postada em 13/07/2008 11:42 hs

Crie um Form com 2 campos (txtNome e txtEnd) e um botão (btnCriar)

agora cole o seguinte código para teste

Sub CriaXML

    Open App.Path & "c:\Arquivo.xml" For Output As #1

        Print #1, "<?xml version=" & Chr(34) & "1.0" & Chr(34) & "?>"
        Print #1, "<Exemplo>"
        Print #1, "     <Record>"
        Print #1, "<Nome>" & txtNome.Text & "</Nome>"
        Print #1, "<End> " & txtEnd.Text & "</End>"
        Print #1, "     </Record>"
        Print #1, "</Exemplo>"

End Sub

Private Sub btnCriar_Click()

Cria XML

End Sub

veja se ajuda

moncerra

SÃO PAULO
SP - BRASIL

ENUNCIADA !

Postada em 13/07/2008 17:39 hs

Cra sop criar mais nao colocar os dados?

Treze

SÃO VICENTE
SP - BRASIL

Postada em 14/07/2008 09:00 hs

Você quer criar sem colocar os dados a partir de um textbox colega, é isso, não entendi, masa se for isso basta fazer assim

Sub CriaXML()

    Open App.Path & "c:Arquivo.xml" For Output As #1

        Print #1, "<?xml version=" & Chr(34) & "1.0" & Chr(34) & "?>"
        Print #1,"<Relacao_de_empresa>"
        Print #1,"<empresa>"
        Print #1,"<nome>Getronics</nome> "
        Print #1,"<email>gtronics.com.br</email>"
        Print #1,"<data>12/07/2008</data>"
        Print #1,"</empresa>"

        Print #1,"<empresa>"

        Print #1,"<nome>Getronics</nome>"
        Print #1,"<email>gtronics.com.br</email>"
        Print #1,"<data>12/07/2008</data>"
        Print #1,"</empresa>"

        Print #1,"</Relacao_de_empresa>"
End Sub

Private Sub btnCriar_Click()

Cria XML

End Sub

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR