Kódovanie kanála RSS - telo

• Smieť 10, 2024

Je veľmi jednoduché použiť ASP na vytvorenie dynamického informačného kanála RSS, ktorý sa aktualizuje vždy, keď na svoje stránky pridáte nový obsah. Táto stránka vám pomôže získať časť tela alebo základného obsahu časti súboru RSS.

Najprv sa uistite, že ste nastavili čítačku RSS na testovanie vášho kanála a že ste si prečítali základné informácie a vytlačili vzorku. Tieto budú dôležité, aby ste mohli otestovať svoj výstup. Uistite sa, že ste už vložili hlavičku / hornú časť súboru RSS, štandardnú hornú časť, ktorá by sa použila na väčšinu všetkých RSS kanálov, ktoré ste vytvorili.

Teraz sme v časti súboru RSS, ktorý v skutočnosti obsahuje meniace sa oznamy o novinkách, aktualizácie blogov, nech už o nich hovoríte čokoľvek. Povedzme z dôvodu argumentu, že máte „články“ a vy chcete ľuďom vždy povedať, aké sú vaše posledné 3 články. Toto je blok kódu, ktorý by ste použili. Všimnite si, že ak chcete, aby XML správne fungovalo, musíte odstrániť podivné citácie a ampersandy. XML pracuje iba so základnými písmenami a číslami. To udusí špeciálne znaky. Ampersandy musia byť uniknuté ako &

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




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

To je všetko! Vložte tento súbor RSS na server a aktualizujte službu IIS tak, aby vedela, že bude so súbormi s príponou RSS spracovávať ako súbory ASP. Teraz by ste mali byť schopní vložiť URL tohto súboru RSS do čítačky RSS a získať aktualizácie!

RSS Feed - Header Part

Základy informačného kanála RSS
Vzorka informačného kanála RSS
Základné nastavenie súboru RSS ASP

Video Návody: PANASONIC S1 ACTIVATION VLOG / FIRMWARE /НА РУССКОМ (Smieť 2024).