ASP RSS పార్సర్, ఫీడ్ రీడర్

డిపాజిట్‌ఫోటోస్ 4651719 సె

ఈ వారాంతంలో వెబ్ ఆధారిత RSS ఫీడ్ రీడర్ల కోసం నెట్‌లో శోధిస్తున్న నా ల్యాప్‌టాప్‌కు నేను అతుక్కుపోయాను. కారణం ఏమిటంటే, ఫీడ్‌ను ప్రదర్శించే ఒక asp RSS ఫీడ్ రీడర్‌ను నేను వ్రాయాలనుకుంటున్నాను, తద్వారా కంటెంట్ స్వయంచాలకంగా HTML ఇమెయిల్‌లోకి స్క్రాప్ చేయబడుతుంది. కాబట్టి వారి బ్లాగ్ లేదా ప్రచురణ కథనాల కోసం వారి ఇమెయిల్ వార్తాలేఖలో కొంత భాగాన్ని రిజర్వ్ చేయాలనుకునే వారికి, దీన్ని సులభంగా చేర్చవచ్చు. క్లయింట్ స్క్రిప్ట్‌ను లోడ్ చేసి అమలు చేసే వరకు జావాస్క్రిప్ట్ వాస్తవానికి కంటెంట్‌ను ప్రదర్శించదు కాబట్టి, జావాస్క్రిప్ట్ RSS బ్రౌజర్‌ల యొక్క సమృద్ధి ఉపయోగపడలేదు. నాకు సర్వర్ వైపు RSS ఫీడ్ రీడర్ అవసరం.

నేను MSXML ఆబ్జెక్ట్ ఉపయోగించి ASP లో నా స్వంత పార్సర్ రాయడం ద్వారా ప్రారంభించాను. నేను దీన్ని చేస్తున్న 75% RSS ఫీడ్‌లను అన్వయించగలిగాను, కాని RSS ఫీడ్‌లపై కొన్ని వదులుగా ఉన్న XML లక్షణాలు ప్రోగ్రామ్ చేయడం చాలా కష్టమని తేలింది. మీరు దీన్ని చర్యలో చూడవచ్చు <span style="font-family: Mandali; ">ఇక్కడ క్లిక్ చేయండి . మీరు గరిష్ట అంశాల సంఖ్య (ni), పదం (nc) వద్ద కత్తిరించిన అక్షరాల సంఖ్య, అలాగే URL ను దాటవచ్చు. మీరు డీబగ్ వేరియబుల్‌తో అసలు ఫీడ్‌ను కూడా చూడవచ్చు <span style="font-family: Mandali; ">ఇక్కడ క్లిక్ చేయండి .

చాలా RSS ఫీడ్‌లు నిజంగా చాలా మురికిగా ఉన్నాయి మరియు XML ఫైల్‌లోని వచనాన్ని స్ట్రింగ్ మానిప్యులేషన్ కోడ్ (ఉహ్!) తో అన్వయించడం అవసరం. వాస్తవానికి, మేము ఇప్పటికీ నెట్‌లో మా RSS 'యువత'లో ఉన్నాము కాబట్టి నాకు ఆశ్చర్యం లేదు. RSS స్పెసిఫికేషన్ల గురించి మరింత చదవండి <span style="font-family: Mandali; ">ఇక్కడ క్లిక్ చేయండి .

చివరగా, నేను ఒక చిన్న రత్నాన్ని చూశాను. నేను డౌన్‌లోడ్ చేయడానికి ఉచిత ASP తరగతిని కనుగొన్నాను. ఇది కొంచెం నెమ్మదిగా ఉంది, కానీ నేను చదవలేని ఫీడ్‌ను కనుగొనలేదు. నేను ఇక్కడ స్టాటిక్ వెర్షన్ మరియు ఇక్కడ డైనమిక్ వెర్షన్ పొందాను.

స్క్రిప్ట్‌లో ఒక జంట గమనికలు. తిరిగి వచ్చిన వివరణలలో నేను కొన్ని HTML ట్యాగ్‌లను క్లియర్ చేయాల్సి వచ్చింది. నేను కనుగొన్న కొద్దిగా శుభ్రపరిచే ఫంక్షన్‌తో చేశాను:

ఫంక్షన్ RemoveHTML (strText) మసక nPos1 మసక nPos2 nPos1 = InStr (strText, ">") అయితే nPos1> 0 nPos2 = InStr (nPos1 + 1, strText, ">") nPos2> 0 అయితే strText = ఎడమ, strText = - 1) & మిడ్ (strText, nPos1 + 2) లేకపోతే నిష్క్రమించండి nPos1 = InStr (strText, ">") లూప్ RemoveHTML = strText ఎండ్ ఫంక్షన్

నేను ఇంకొక చక్కని చిన్న కోడ్‌ను కూడా జోడించాను: కొన్నిసార్లు, నేను ఎక్కువ లేదా అంతకంటే తక్కువ వివరణను ప్రదర్శించాలనుకుంటున్నాను. అయితే, నేను అక్షరాల సంఖ్యను పరిమితం చేస్తే, పదం మధ్యలో ఉన్న వివరణను నేను కత్తిరించవచ్చు. నేను అలా చేయకూడదనుకుంటున్నాను!

ఫంక్షన్ కటాఫ్ (strText, intChars) dim intLength dim j intLength = len (strText) intChars> intLength అయితే j = intChars కోసం 0 step -1 కి మధ్యలో ఉంటే (strText, j, 1) = "" తరువాత తదుపరి నిష్క్రమణ j> 0 అప్పుడు strText = left (strText, j-1) & "..." else strText = strText end if end if Cutoff = strText End Function

(ఈ ఎంట్రీలో నా కోడ్‌ను సరిగ్గా ప్రదర్శించడంలో నాకు కొన్ని సమస్యలు ఉన్నాయి… మీకు ఈ ఫంక్షన్లలో ఏవైనా సమస్యలు ఉంటే నాకు తెలియజేయండి!)

నెట్‌లో మరికొన్ని సాధనాలను నేను గమనించాను. అక్కడ ఒక
.NET వెర్షన్, చాలా PHP వెర్షన్లు, టన్నుల జావాస్క్రిప్ట్ వెర్షన్లు.

తీర్మానించడానికి, RSS లక్షణాలు మెరుగుపరచడం కొనసాగుతుందని మరియు వాస్తవ ఫీడ్‌లు అన్ని సందర్భాల్లోనూ XML ప్రమాణాలకు అనుగుణంగా ఉంటాయని నేను ఆశిస్తున్నాను. టైప్‌ప్యాడ్, బ్లాగు మొదలైన ఉచిత అనువర్తనాలు వాటి RSS కార్యాచరణను మెరుగుపరచడం అవసరం. మైస్పేస్, క్సాంగా, లైవ్ జర్నల్ మొదలైన అదనపు బ్లాగులు వాటి RSS కార్యాచరణను మెరుగుపరచాలి. RSS శక్తివంతమైనది…క్రిస్ బాగ్గోట్ ఇమెయిల్ వర్సెస్ RSS లో ఒక మంచి భాగాన్ని రాశారు. నేను వారి కార్యాచరణను కలపడం రెండింటి ప్రభావాన్ని పెంచుతుందని అనుకుంటున్నాను!

మీరు ఏమి ఆలోచిస్తాడు?

స్పామ్ తగ్గించడానికి ఈ సైట్ Akismet ను ఉపయోగిస్తుంది. మీ వ్యాఖ్య డేటా ఎలా ప్రాసెస్ చేయబడిందో తెలుసుకోండి.