RSS-syötteen koodaus

• Huhtikuu 20, 2024

ASP: n avulla on erittäin helppoa luoda dynaaminen RSS-syöte, joka päivittyy aina, kun lisäät tuoretta sisältöä sivustoosi. Tällä sivulla voit saada runko- tai ydinsisällön osan RSS-tiedostojoukosta.

Varmista ensin, että olet asentanut RSS-lukijan testaamaan syötettäsi ja että olet lukenut perustiedot ja tulostanut näytteen. Ne ovat tärkeitä, jotta voit testata tulostasi. Varmista, että olet jo lisännyt RSS-tiedostosi otsikko / yläosa, tavallinen yläosa, joka menee useimpaan luomaasi RSS-syötteeseen.

Nyt olemme RSS-tiedoston osassa, joka sisältää muuttuvan uutisilmoituksen, blogipäivitykset riippumatta siitä, mistä kerrot. Sanotaan väitteen vuoksi, että sinulla on "artikkeleita" ja haluat aina kertoa ihmisille, mitkä ovat 3 uusinta artikkeliasi. Tässä on käyttämäsi koodilohko. Huomaa, että sinun on poistettava outoja lainausmerkkejä ja merkkejä, jotta XML toimisi oikein. XML toimii VAIN peruskirjaimilla ja numeroilla. Se tukehtuu erikoishahmoihin. Ampersandrit on paeta, koska &

<%
Set FeatSite = Server.CreateObject ("ADODB.Recordset")
SQLText = "SELECT art_id, art_title, art_date, art_desc " & _
"from articles where art_date <= '" & Now() & "' " & _
"order by art_date DESC"
FeatSite.Open SQLText, strConnect, adOpenForwardOnly, adLockReadOnly, adCmdText

FeatCt = 1
do while not FeatSite.EOF and FeatCt < 4

ArtDesc = Replace(FeatSite("art_desc"), chr(180), "'")
ArtDesc = Replace(ArtDesc, "´", "'")
ArtDesc = Replace(ArtDesc, "&", "&")

ArtTitle = Replace(FeatSite("art_Title"), chr(180), "'")
ArtTitle = Replace(ArtTitle, "´", "'")
ArtTitle = Replace(ArtTitle, "&", "&")

ArtDate = FeatSite("art_date")

ArtHour = Hour(ArtDate)
if ArtHour < 10 then ArtHour = "0" & ArtHour
ArtMin = Minute(ArtDate)
if ArtMin < 10 then ArtMin = "0" & ArtMin
ArtSec = Second(ArtDate)
if ArtSec < 10 then ArtSec = "0" & ArtSec

ArtDateT = WeekdayName(Weekday(ArtDate), TRUE) & ", " & Day(ArtDate) & " " & _
MonthName(Month(ArtDate), TRUE) & " " & Year(ArtDate) & " " & _
ArtHour & ":" & ArtMin & ":" & ArtSec & " EST"
%>






YOURURLGOESHEREPLUS & ARTID = Asp








<%
FeatSite.MoveNext
FeatCt = FeatCt + 1
loop
FeatSite.close()
set FeatSite = Nothing
%>




===========================

Se siitä! Laita tämä RSS-tiedosto palvelimellesi ja muista päivittää IIS niin, että se osaa käsitellä RSS-tunnisteella varustettuja tiedostoja ASP-tiedostoina. Nyt sinun pitäisi voida asettaa kyseisen RSS-tiedoston URL-osoite RSS-lukijaan ja saada päivitykset!

RSS-syöte - otsikon osa

RSS-syötteen perusteet
RSS-syötteenäyte
RSS ASP-tiedoston perusasetukset

Video-Ohjeita: Podcast Hosting & Submission Made Simple (Apple Podcasts, Stitcher, Google Play) (Huhtikuu 2024).