OK πρώτα το xml αρχείο.
Ας υποθέσουμε πως το αρχείο είναι για “news” και έχει 3 πεδία
<title>
<link>
<description>
Για παράδειγμα:
<?xml version="1.0" encoding="windows-1253"?>
<news>
<item>
<title>Τίτλος εδώ όπως tip.gr</title>
<link>http://tip.gr</link>
<description>ASP και ASP.NET Ερωτήσεις, sites downloads</description>
</item>
</news>
Τέλος το xml!!!
Μπορείς αν θέλεις να το σώσεις και εσύ ως demo.xml για το παράδειγμα που
ακολουθεί.
Εδώ ο asp κώδικας για να διαβάσουμε το xml από asp!
<%
Dim objXML
Set objXML = Server.CreateObject("microsoft.XMLDOM")
objXML.Load (Server.MapPath("demo.xml"))
'αν το αρχείο είναι στον ίδιο φάκελο και δεν
υπάρχουν λάθη
If objXML.parseError.errorcode = 0 Then
'strTitle είναι το value του πρώτου child node του
<item>
strTitle = objXML.documentElement.firstChild.firstChild.text
'χρησιμοποιούμε nodeList object , για να πάρουμε το
link και description ως strings . Το index είναι
'σε μηδενική βάση, έτσι<link> = 1 και description = 2.
strLink = objXML.documentElement.firstChild.childNodes(1).Text
strDescription = objXML.documentElement.firstChild.childNodes(2).Text
'γράφουμε το title
response.Write (strTitle & "<br>")
'γράφουμε το link
Response.Write (strLink & "<br>")
'γράφουμε το description
Response.Write (strDescription & "<br>")
'αν δεν υπάρχουν λάθη
Else
Response.Write ("οοόπααα! Λάθος")
End If
'Καθαρίζουμε και τέλος
Set objXML = Nothing
%>
Και, να
το αποτέλεσμα.
Download
Tip.gr Cat XML