• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Nyc

PARSER - Chilkat.xml AJUDA POR FAVOR!!!

10 mensagens neste tópico

:wallbash:Olá, queria um exemplo de código que "lêsse" xml num código em asp. Encontrei esse código abaixo que parece que faz isso. Gostaria de saber de que modo testo isso! Tem Alguém aí que possa me ajudar? Por favor, é urgente!!!

<%@ LANGUAGE="VBSCRIPT" %>

<HTML>

<HEAD>

<TITLE>XML Iterate</TITLE>

</HEAD>

<BODY>

<%

 

    ' Create an ASP XML parser object

    set xml0 = Server.CreateObject("Chilkat.Xml")

    ' Returns the XML page as a Variant

    set xml = xml0.HttpGet("http://www.xml-parser.com/companies.xml")

    set company = xml.FirstChild()

    While Not (company Is Nothing)

        Response.write company.GetChildContent("name") + "<br>"

        set company = company.NextSibling()

    Wend

 

%>

</BODY>

</HTML>

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

É asp clássico!!

Qualquer ajuda é bem vinda!!

Ficarei muito feliz por alguma dica..

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

É asp clássico!!

Qualquer ajuda é bem vinda!!

Ficarei muito feliz por alguma dica..

Queres ler um ficheiro XML mas já tens o ficheiro ? Não entendo muito bem o que queres .

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Bom, preciso de um código que leia informações xml num código em asp e as separe - para enviá-las para um banco de dados em mysql. Por enquanto, preciso testar esse código que me indicaram, só não sei como testar, só isso. Sou iniciante no ramo da programação.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

O código ASP Script to Iterate XML Records parece razoável. Mas como faço para testá-lo? Em que ambiente devo digitá-lo? e em que linha devo pôr o caminho do arquivo que desejo separar os dados?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Mas descarregaste algum exemplo ?

Viste, por exemplo, o Saving and Retrieving Data in XML

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Não estou a entender..

O que já fiz: já baixei o Chilkat XML ActiveX, que é a biblioteca.

E depois disso? o que mais que tenho que fazer para testar o código?

Olha, estou no Brasil e aqui, ainda é horário de trabalho. Tem como conversamos por algum chat?  :hmm:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Sim, descarregaste a biblioteca, e não viste o exemplo ? É que este exemplos cria e depois lê um ficheiro XML

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)


'  Create an XML file with data that will later be loaded and
'  accessed by field name:
set xml = CreateObject("Chilkat.Xml")
xml.Tag = "emailData"

xml.NewChild2 "from","admin@chilkatsoft.com"
xml.NewChild2 "toName","Chilkat Support"
xml.NewChild2 "toAddr","support@chilkatsoft.com"
xml.NewChild2 "subject","This is a test"
xml.NewChild2 "body","This is an email body"

'  Save the XML:

success = xml.SaveXml("emailData.xml")
If (success <> 1) Then
    MsgBox xml.LastErrorText
    WScript.Quit
End If

set xml2 = CreateObject("Chilkat.Xml")

'  Load the XML file:
success = xml2.LoadXmlFile("emailData.xml")
If (success <> 1) Then
    MsgBox xml2.LastErrorText
    WScript.Quit
End If

'  Access the data by name
outFile.WriteLine(xml2.GetChildContent("from"))
outFile.WriteLine(xml2.GetChildContent("toName"))
outFile.WriteLine(xml2.GetChildContent("toAddr"))
outFile.WriteLine(xml2.GetChildContent("subject"))
outFile.WriteLine(xml2.GetChildContent("body"))
outFile.WriteLine("------")

'  Let's say I want to load this into an email object:
set email = CreateObject("Chilkat.Email2")

email.From = xml2.GetChildContent("from")

toName = xml2.GetChildContent("toName")
toAddr = xml2.GetChildContent("toAddr")
email.AddTo toName,toAddr
email.Subject = xml2.GetChildContent("subject")
email.Body = xml2.GetChildContent("body")

outFile.WriteLine(email.GetMime())


outFile.Close

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora