Obviously > put item 2 of LNN & cr after newHtmlStr should be put item 2 to -1 of LNN & cr after newHtmlStr
Jim On 1/26/07 1:20 PM, "Jim Ault" <[EMAIL PROTECTED]> wrote: > On 1/26/07 10:56 AM, "Chipp Walters" <[EMAIL PROTECTED]> wrote: > >> function stripAllTagsBut pHtml,pTagsList >> --> pTagsList IS A LIST OF TAGS NOT TO EXCLUDE FROM PARSING >> --> EX. LINE 1 OF pTagsList CAN BE "img" AND LINE 2 CAN BE "b", etc.. >> It's used to strip all tags from HTML but those in the pTagsList parameter. >> >> IOW, it can be used to grab the HTML of a page, and strip everything but the >> img tags. >> > Do you need them in the sequencial order? > assuming Yes > > I would start with the idea of making the 'un-naughty bits' a list to be > used in an optional repeat loop below, then > > --------------- start copy here > --Short, fast, sweet. > on test > put fld 1 into htmlStr --assumes sorce is in fld 1 > replace Null with empty in htmlStr --clean out > --numtochar(3) works just as well > replace cr with "†" in htmlStr --preserve > > --repeat for each tag you want to preserve > replace "<img" with cr&"img" in htmlStr > > set the itemDel to ">" > repeat for each line LNN in (line 2 to -1 of htmlStr) > put item 1 of LNN & null after newHtmlStr > put item 2 of LNN & cr after newHtmlStr > end repeat > put newHtmlstr into line 2 to -1 of htmlStr > --end repeat for each tag you want to preserve > ------------- > -- Now line 2 to last start with "img" and have a null char as the end > tag > -- You can strip all <tags> then restore the html by > ------- > --Now restore all the protected tags > replace cr with "<" in htmlStr > replace null with ">" in htmlStr > replace "†" with cr in htmlStr > put htmlStr into fld 2 > end test > > -- although this last replace step may not make any sense since HTML pages > don't use cr to format or delimit anything. > > This is very fast and protects/restores the targeted tags. > > Jim Ault > Las Vegas > > > _______________________________________________ > use-revolution mailing list > use-revolution@lists.runrev.com > Please visit this url to subscribe, unsubscribe and manage your subscription > preferences: > http://lists.runrev.com/mailman/listinfo/use-revolution _______________________________________________ use-revolution mailing list use-revolution@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-revolution