Just like to thank you all for helping me with this. I decided to cut
out all tags and then add important ones later. what I was trying to do
before with * I accomplished with .+? I hope to eventually have a free
program like ipodsync (which costs $15) and if anyone here wants
something like that I can either send you my source code right now or
send it when its more finnished just e-mail me at craftkiller at gmail dot com
my code to eliminate the tags ended up being what is show below under
the pagerecieved event of an http socket and later I am gonna add
<title> tags. THANK YOU ALL!!!
one last question though instead of doing replace &#(some number); with
a symbol that I guessed its value is, is there a way that I can get
realbasic to get the correct symbol for it for me? i know char(int) does
something like that but I need an integer value for that.
content = ReplaceAll(content, "<","<")
content = replaceall(content, "&#8243;", "'")
content = replaceall(content, ">", ">")
content = replaceall(content, "'", "'")
dim re as new regEx
re.SearchPattern = "(<link>.+?</link>|<a.+?</a>|<.+?>)"
re.ReplacementPattern = ""
re.Options.ReplaceAllMatches = true
content = re.replace(content)
rssfield.text = content
dim f as folderitem
dim file as new textoutputstream
f =
DesktopFolder.child("F").child("Notes").child("Web").child("Worldofwarcraft.text")
file = f.CreateTextFile
file.writeline content
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.322 / Virus Database: 267.3.0 - Release Date: 5/30/2005
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
|