ASP RSS ანალიზატორი, არხების მკითხველი

Depositphotos 4651719 s

ამ შაბათ-კვირას მე მივწერე ჩემი ლეპტოპი, რომელიც ინტერნეტში RSS feed მკითხველს ვეძებ. მიზეზი ის არის, რომ მინდოდა დამეწერა asp RSS feed მკითხველი, რომელიც აჩვენებდა მასალებს ისე, რომ შინაარსის ავტომატური გატეხვა ხდებოდა HTML ელ.ფოსტაში. ასე რომ, იმ ადამიანებისთვის, რომელთაც სურთ თავიანთი ელ.ფოსტის ბიულეტენის ნაწილის დაზოგვა თავიანთი ბლოგის ან პუბლიკაციების სტატიებისათვის, ის ადვილად შეიტანება. ვინაიდან JavaScript ფაქტობრივად არ აჩვენებს შინაარსს, სანამ კლიენტი არ იტვირთება და არ ასრულებს სკრიპტს, JavaScript RSS ბრაუზერების სიმრავლე სასარგებლო არ იყო. მე მჭირდებოდა სერვერის RSS feed მკითხველი.

დავიწყე საკუთარი ანალიზატორის დაწერა ASP- ში MSXML ობიექტის გამოყენებით. ამის გაკეთება შევძელი RSS არხების დაახლოებით 75% -ის, მაგრამ RSS– ის ზოგიერთი ფხვიერი მახასიათებლის დაპროგრამება ძალიან რთული აღმოჩნდა. თქვენ შეგიძლიათ ნახოთ იგი მოქმედებაში აქ. შეგიძლიათ გაიაროთ ერთეულების მაქსიმალური რაოდენობა (ni), სიტყვაზე (nc) მოჭრილი სიმბოლოების რაოდენობა, ასევე 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) სხვა გასასვლელი დასრულება თუ nPos1 = InStr (strText, ">") მარყუჟის ამოღება HTML = strText დასრულების ფუნქცია

მე ასევე დავამატე კიდევ ერთი პატარა სისუფთავე კოდი: ზოგჯერ, შეიძლება მინდოდა მეტნაკლებად აღვწერო აღწერილობა. ამასთან, თუ სიმბოლოების რაოდენობას უბრალოდ შევზღუდავ, მაშინ შეიძლება სიტყვის შუა ნაწილში აღწერა შევაჩერო. არ მინდა ამის გაკეთება!

ფუნქციის გათიშვა (strText, intChars) dim 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 დასრულების ფუნქცია

(ამ ჩანაწერში ჩემი კოდის სწორად ჩვენებასთან დაკავშირებით პრობლემები შემექმნა… გამაგებინეთ, თუ რაიმე ამ ფუნქციასთან დაკავშირებული პრობლემები გაქვთ!)

მე კიდევ რამდენიმე ინსტრუმენტი შევნიშნე ქსელში. Იქ არის
. NET ვერსია, მრავალი PHP ვერსია, ტონა JavaScript ვერსიები.

დასასრულს, იმედი მაქვს, რომ RSS სპეციფიკაციები კვლავ გაუმჯობესდება და რეალური წყაროები შესაბამისობაშია XML სტანდარტებთან. უფასო პროგრამებმა, როგორიცაა TypePad, WordPress და ა.შ., უნდა დახვეწონ თავიანთი RSS ფუნქციები. დამატებით ბლოგებს, როგორიცაა MySpace, Xanga, LiveJournal და ა.შ. საჭიროებს RSS ფუნქციონირების გაუმჯობესებას. RSS ძლიერიაკრის ბაგოტი დაწერა ლამაზი ნაწილი ელ.ფოსტით vs. RSS. ვფიქრობ, მათი ფუნქციონალური კომბინაციით შეიძლება ორივემ გავლენა გაზარდოს!

რას ფიქრობთ?

ეს საიტი იყენებს Akismet- ს, რათა შეამციროს სპამი. შეისწავლეთ თქვენი კომენტარის მონაცემები დამუშავებული.