akhar wrote: > REBOL [ > Title: "e-mail finder" > Date: 13-May-2000 > Author: "Stephane Jolicoeur" > File: %octo.r > Email: [EMAIL PROTECTED] > Purpose: { > To find urls within a file!!! > } > Comments: { > do not use for SPAM > } > ] > urls: make block! Need a integer size after 'block!. > text: make string! 0 > html-code: [ > thru "http://" copy url to newline (append urls url) | > copy txt to "http:" (append text txt) > ] > page: read %urls.txt > parse page [to "http://" some html-code] > foreach url urls Need a '[ after 'urls, as you're repeating the below code for each URL. Have the line: url: join http:// url as it simplifies code. > if exists? join http:// [url] [ Don't need '[ and '] around 'url. > as: read join http:// [url] Better as: as: read url > ;print url > if find as "@" [ Above is better as: either find as "@" [ BTW are you looking for URLs or email addresses in the page? > print ["@" "fut trouver sur" url] > newline > print " " Above is better as: print ["@" "fut trouver sur" url newline > ] print "cannot find it" Above is better as: ] [print "cannot find it"] ; Other branch of 'either. > clear as No need for above line > ][print ["je ne peux acceder ce site:" url]] I'm fairly sure this line isn't needed. > ]; No need for semi-colon in above line. > as: ask "done??" This line should be moved above the '[ above. Fix these problems and your problem should be solved for all sites that don't require cookies, or that don't require specific browsers. I hope that helps! Good luck. Andrew Martin ICQ: 26227169 http://members.xoom.com/AndrewMartin/ -><-