ASP RSS-i parser, voo lugeja
Sel nädalavahetusel olen oma sülearvuti külge liimitud ja otsinud netist veebipõhist RSS sööda lugejad. Põhjus on selles, et ma tahtsin kirjutada ASP RSS-kanali lugeja, mis kuvaks kanali nii, et sisu saaks automaatselt kraapida HTML meili. Nii et inimesed, kes soovivad reserveerida osa oma e-posti uudiskirjast oma ajaveebi või väljaannete artiklite jaoks, saab selle hõlpsasti lisada.
Kuna JavaScript ei kuva sisu tegelikult enne, kui klient skripti laadib ja käivitab, ei olnud JavaScripti RSS-i brauserite rohkus kasulik. Mul oli vaja serveripoolset RSS-kanalite lugejat.
An parsimiseks XML sööda ASP-s, saate kasutada MSXML-i teeki, mis on saadaval ASP-s. Siin on põhinäide, kuidas sõeluda XML-voogu ASP-i abil.
<%
' Create an instance of the MSXML DOMDocument object
Set xmlDoc = Server.CreateObject("Msxml2.DOMDocument.6.0")
' Load the XML feed from a URL
xmlDoc.async = False
xmlDoc.load("http://example.com/feed.xml")
' Check if the XML is loaded successfully
If xmlDoc.parseError.errorCode <> 0 Then
Response.Write "Error loading XML: " & xmlDoc.parseError.reason
Else
' Navigate through the XML structure and retrieve data
Set items = xmlDoc.selectNodes("//item") ' Change "item" to the appropriate XML element name in your feed
' Loop through the items
For Each item In items
' Access elements within each item
title = item.selectSingleNode("title").text
link = item.selectSingleNode("link").text
description = item.selectSingleNode("description").text
' Perform your sales and marketing operations with the retrieved data
' For example, you can insert this data into a database or display it on a webpage.
Next
End If
' Clean up the XML document
Set xmlDoc = Nothing
%>
Selles koodis loome esmalt eksemplari Msxml2.DOMDocument.6.0
objekt XML-iga töötamiseks. Seejärel laadime XML-voo kohast a URL ja kontrollige, kas laadimine õnnestus. Kui vigu pole, kasutame XML-i struktuuris navigeerimiseks ja andmete toomiseks teie määratud elementidest XPathi. Lõpuks saate hangitud andmetega teha oma müügi- ja turundustoiminguid.
Saate muuta väljundit, et pakkuda väljavõtet kindla arvu sõnadega, ja seejärel lisada "…", mis näitab, et tekst jätkub. Siin on näide selle kohta, kuidas saate seda oma ASP-koodis teha.
<%
' Create an instance of the MSXML DOMDocument object
Set xmlDoc = Server.CreateObject("Msxml2.DOMDocument.6.0")
' Load the XML feed from a URL
xmlDoc.async = False
xmlDoc.load("http://example.com/feed.xml")
' Check if the XML is loaded successfully
If xmlDoc.parseError.errorCode <> 0 Then
Response.Write "Error loading XML: " & xmlDoc.parseError.reason
Else
' Navigate through the XML structure and retrieve data
Set items = xmlDoc.selectNodes("//item") ' Change "item" to the appropriate XML element name in your feed
' Loop through the items
For Each item In items
' Access elements within each item
title = item.selectSingleNode("title").text
link = item.selectSingleNode("link").text
description = item.selectSingleNode("description").text
' Modify the description to include an excerpt with a specific number of words
excerptLength = 30 ' Change this number to your desired word count
descriptionArray = Split(description, " ")
If UBound(descriptionArray) > excerptLength Then
excerpt = Join(LBound(descriptionArray, excerptLength), " ") & "..."
Else
excerpt = description
End If
' Perform your sales and marketing operations with the excerpt
' For example, you can insert this data into a database or display it on a webpage.
Next
End If
' Clean up the XML document
Set xmlDoc = Nothing
%>
Sellesse koodi lisasime jaotise, mis muudab description
luua väljavõte kindla arvu sõnadega (selles näites 30) ja lisab "…", kui kirjeldus on pikem. Saate reguleerida excerptLength
muutuja, et juhtida väljavõtte sõnade arvu.
See muudatus annab teile müügi- ja turundustoimingute väljavõttena kärbitud kirjelduse.
Palun asenda http://example.com/feed.xml
koos selle XML-voo URL-iga, mida soovite sõeluda ning kohandada elementide nimesid ja andmetöötlust vastavalt teie konkreetsele XML-struktuurile ja nõuetele.