i just cant keep figuring out when you use this with two different files and go say:
 
function <file here>
function <second file here>
function <file here>
 
btw: these are html files with one body having BGCOLOR="white" and one simply having <BODY>
 
----- start of function -----
 
make_generic_html_locator: func [
  a [file!] "Filename to add location reference for"
      ]
 [
 page_content: "sd"
 clear page_content
 if not exists? a [print reform ["File not found:" a] halt]
 in_file: read a
 in_file: make string! in_file
 if not find in_file "<HTML>" [print "File is not HTML Compliant"
     halt]
 
 if find in_file "<TITLE>" [
 parse in_file [thru {<TITLE>} copy page_title to {</TITLE>}]
  print page_title
     ]
 parse in_file [thru {<BODY} copy body_attrib to {>}]
 body_tobe: rejoin [{<BODY} body_attrib {>}]
 if find in_file "<BODY>"  [body_tobe: {<BODY>}]
 parse in_file [thru body_tobe copy page_content to {</HTML>}]
  print body_tobe
  print page_content
  clear page_content
  clear body_tobe
  print "Generic Page Locator Finished"
 ]

Reply via email to