Marketing Content

Parserê RSS-yê ASP-ê, Xwendekarê Feed-ê

Dawiya vê hefteyê, ez bi laptopa xwe ve zeliqiyam, li torê li ser tevneyê digerim RSS xwendevanên feed. Sedem ew e ku min xwest ez an binivîsim ASP Xwendevana xwarina RSS-ê ya ku dê feedê nîşan bide da ku naverok bixweber di nav an de were hilanîn HTML email. Ji ber vê yekê, ji bo mirovên ku dixwazin beşek ji bultena e-nameya xwe ji bo gotarên Blog an Weşana xwe veqetînin, ew dikare bi hêsanî were nav kirin.

Ji ber ku JavaScript bi rastî naverokê nîşan nade heya ku xerîdar skrîptê bar bike û bimeşîne, pirbûna gerokên JavaScript RSS ne bikêr bû. Min pêdivî bi xwendevanek RSS-ya server-ê hebû.

Parse kirin an XML di ASP de bixwin, hûn dikarin pirtûkxaneya MSXML ya ku di ASP de heye bikar bînin. Li vir mînakek bingehîn e ku meriv çawa bi karanîna ASP-ê feed XML-ê parsek dike:

<%
' 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
%>

Di vê kodê de, em pêşî mînakek ji çêdikin Msxml2.DOMDocument.6.0 object ji bo xebatê bi XML. Dûv re em xwarina XML ji a bar dikin URL û kontrol bikin ka barkirin serketî bû. Heke xeletî tunebin, em XPath bikar tînin da ku di nav avahiya XML-ê de bigerin û daneyan ji hêmanên ku hûn diyar dikin bistînin. Di dawiyê de, hûn dikarin bi daneyên ku hatine wergirtin ve karûbarên firotanê û kirrûbirra xwe bikin.

Hûn dikarin derketinê biguherînin da ku jêkek bi hejmarek peyvan re peyda bikin û dûv re "…" lê zêde bikin da ku destnîşan bikin ku nivîs berdewam dike. Li vir mînakek heye ku hûn çawa dikarin wê di koda ASP-a xwe de bikin:

<%
' 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
%>

Di vê kodê de, me beşek ku diguhezîne lê zêde kir description ku bi hejmarek peyvan (di vê nimûneyê de 30) veqetandek çêbike û heke danasîn dirêjtir be "…" lê zêde bike. Hûn dikarin eyar bikin excerptLength guherbar ji bo kontrolkirina hejmara peyvên di veqetandinê de.

Ev guheztin dê ji bo kirrûbirra we ya firotanê û kirrûbirra we ravekirinek qutkirî wekî jêvek peyda bike.

Ji kerema xwe veguherînin http://example.com/feed.xml bi URL-ya xwarina XML-ê re hûn dixwazin navên hêmanan û hilgirtina daneyan li gorî avahî û hewcedariyên xwe yên XML-ya taybetî parse bikin û sererast bikin.

Douglas Karr

Douglas Karr CMO ya ye OpenINSIGHTS û damezrînerê ya Martech Zone. Douglas alîkariya bi dehan destpêkên serketî yên MarTech kir, di kirîn û veberhênanên Martech de zêdetirî 5 mîlyar dolar alîkarî kir, û di cîbicîkirin û otomatîkkirina stratejiyên firotanê û kirrûbirra xwe de alîkariya pargîdaniyan didomîne. Douglas veguherînek dîjîtal a navneteweyî û pispor û axaftvanek MarTech e. Douglas di heman demê de nivîskarek çapkirî ya rêberê Dummie û pirtûkek serokatiya karsaziyê ye.

Zimanî babet Related

Vegere ser topê
Nêzîkî

Adblock Hat Tesbîtkirin

Martech Zone dikare vê naverokê bê mesref ji we re peyda bike ji ber ku em malpera xwe bi dahata reklamê, girêdanên pêwendiyê, û sponsorgeriyê drav dikin. Dema ku hûn malpera me temaşe dikin, em ê spas bikin ger hûn bloka reklama xwe rakin.