Kodiranje vira RSS - Body

• Maj 15, 2024

S pomočjo ASP-a je zelo enostavno ustvariti dinamičen vir RSS, ki se posodablja vsakič, ko na spletno mesto dodate svežo vsebino. Ta stran vam pomaga, da del - ali osnovno vsebino - del nabora datotek RSS.

Najprej se prepričajte, da ste postavili bralnik RSS za testiranje vira in da ste prebrali osnove in natisnili vzorec. To bo pomembno, da boste lahko preizkusili svoj rezultat. Prepričajte se, da ste že dali v glavo / zgornji del datoteke RSS, standardni vrh, ki bi segal na večino vseh RSS virov, ki ste jih ustvarili.

Zdaj smo v razdelku datoteke RSS, ki dejansko vsebuje objavljeno novico, posodobitve spletnega dnevnika, karkoli že govorite ljudem. Recimo zaradi argumentacije, da imate "članke" in ljudem želite vedno povedati, kakšni so vaši 3 najnovejši članki. Tu je blok kod, ki bi ga uporabili. Za pravilno delovanje XML morate začrtati nenavadne narekovaje in razširitve. XML deluje SAMO z osnovnimi črkami in številkami. Duši se nad posebnimi liki. Ampersande je treba umakniti kot &

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






YOURLGOESHEREPLUS & ARTID = .asp








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




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

To je to! Postavite to datoteko RSS na strežnik in poskrbite, da boste posodobili IIS, tako da bo z datotekami razširil RSS kot datoteke ASP. Zdaj bi morali imeti možnost, da URL te datoteke RSS postavite v svoj bralnik RSS in dobite posodobitve!

RSS Feed - del glave

Osnove vira RSS
RSS Vzorec vira
Osnovna nastavitev datoteke ASP RSS