ASP RSS վերլուծիչ, թարմացվող բովանդակության ընթերցող

Depositphotos 4651719 s

Այս հանգստյան օրերին ես սոսնձված եմ իմ նոութբուքի վրա ՝ ցանցում որոնելով RSS հոսքի ընթերցողներ: Պատճառն այն է, որ ես ուզում էի գրել asp RSS հոսքի ընթերցող, որը կցուցադրեր թարմացվող բովանդակությունը, որպեսզի բովանդակությունն ավտոմատ կերպով գրվեր HTML էլ. Այսպիսով, այն մարդկանց համար, ովքեր ցանկանում են իրենց էլ.փոստի տեղեկագրի մի մասը վերապահել իրենց Բլոգի կամ Հրապարակումների հոդվածների համար, այն կարող է հեշտությամբ ներառվել: Քանի որ JavaScript- ը իրականում չի ցուցադրում բովանդակությունը, քանի դեռ հաճախորդը չի բեռնում և չի կատարում սցենարը, JavaScript RSS բրաուզերների մեծ քանակությունն օգտակար չէր: Ինձ սերվերային կողմից RSS հոսքի ընթերցող էր պետք:

Ես սկսեցի գրել իմ սեփական վերլուծիչը ASP- ում `օգտագործելով MSXML օբյեկտը: Ես կարողացա վերլուծել RSS հոսքերի շուրջ 75% -ը, դա անելով, բայց RSS հոսքերի որոշ չամրացված տեխնիկական բնութագրեր շատ դժվար էր ծրագրավորել: Դուք կարող եք դա տեսնել գործողության մեջ այստեղ, Կարող եք փոխանցել տարրերի առավելագույն քանակը (ni), բառի վրա կտրված նիշերի քանակը, ինչպես նաև URL- ը: Կարող եք նաև տեսնել լրահոսի փոփոխման միջոցով իրական հոսքը այստեղ.

RSS- ների շատ հոսքեր իրոք բավականին «կեղտոտ» են և պահանջում են XML ֆայլի տեքստի վերլուծություն լարի մանիպուլյացիայի ծածկագրով (ուխ!): Իհարկե, մենք դեռ մեր RSS «երիտասարդության» մեջ ենք ցանցում, այնպես որ չեմ զարմանում: Կարդալ ավելին RSS բնութագրերի մասին այստեղ.

Վերջապես, ես բախվեցի մի փոքրիկ գոհարի: Ես գտա անվճար ներբեռնելու ASP դաս: Մի փոքր դանդաղ է, բայց ես չեմ գտել լրահոս, որը չկարողացավ կարդալ: Ես ստատիկ տարբերակ ունեմ այստեղ և դինամիկ տարբերակ:

Մի քանի նշում է սցենարի մասին: Վերադարձված նկարագրություններում անհրաժեշտ էր հստակեցնել HTML որոշ պիտակները: Ես դա արեցի մի փոքր մաքրման գործառույթով, որը գտա.

Գործառույթը Հեռացնել HTML- ը (strText) Dim nPos1 Dim nPos2 nPos1 = InStr (strText, ">") Do while nPos1> 0 nPos2 = InStr (nPos1 + 1, strText, ">") Եթե nPos2> 0 Ապա strText = Ձախ (strText, nPos) - 1) & Mid (strText, nPos1 + 2) Ուրիշ Ելք Do End Եթե nPos1 = InStr (strText, ">") Loop RemoveHTML = strText End Function

Ես նաև ավելացրեցի մեկ այլ կոկիկ կոդ. Երբեմն, գուցե ցանկանայի նկարագրել քիչ թե շատ նկարագրություն: Այնուամենայնիվ, եթե ես պարզապես սահմանափակեմ նիշերի քանակը, ապա ես կարող եմ կտրել նկարագրությունը բառի մեջտեղում: Ես չեմ ուզում դա անել:

Գործառույթի կտրումը (strText, intChars) թույլ intLength dim j intLength = len (strText), եթե intChars> intLength ապա j = intChars- ի համար 0 քայլ -1 եթե կես (strText, j, 1) = "" ապա դուրս գալ հաջորդի համար, եթե j> 0 ապա strText = ձախ (strText, j-1) & "..." other strText = strText վերջ, եթե վերջ, եթե Cutoff = strText End Function

(Այս գրառման մեջ կոդս ճիշտ ցուցադրելու հետ կապված որոշ խնդիրներ առաջացան… ինձ տեղեկացրեք, եթե այս գործառույթներից որևէ մեկի հետ խնդիրներ ունեք):

I'veանցում նույնպես ես նկատել եմ ևս մի քանի գործիք: Այնտեղ կա
: NET տարբերակ, բազմաթիվ PHP տարբերակներ, տոննա JavaScript տարբերակներ:

Ամփոփելով, հուսով եմ, որ RSS բնութագրերը շարունակում են ճշգրտվել և իրական հոսքերը բոլոր դեպքերում համապատասխանում են XML չափանիշներին: Անվճար ծրագրերը, ինչպիսիք են TypePad, WordPress և այլն, պետք է բարելավեն իրենց RSS ֆունկցիոնալությունը: Լրացուցիչ բլոգերը, ինչպիսիք են MySpace- ը, Xanga- ն, LiveJournal- ը և այլն, պետք է բարելավեն իրենց RSS ֆունկցիոնալությունը: RSS Հզոր էՔրիս Բագոտ մի գեղեցիկ կտոր գրեց էլ. փոստի ընդդեմ RSS- ի: Կարծում եմ `դրանց ֆունկցիոնալությունը համատեղելը կարող է մեծացնել երկուսի ազդեցությունը:

Ինչ եք կարծում?

Այս կայքը օգտագործում է Akismet- ը սպամի նվազեցման համար: Իմացեք, թե ինչպես է ձեր տվյալները մշակվում.