function web_update_html(str_start, str_stop, file, htmlfile, htmlfile_new)


% Load existing html file
pubs = textread(htmlfile,'%s','delimiter','\n','whitespace','');
il=0; clear filenew

PAPERS_PRINTED=0;

for n=1:length(pubs)
    if PAPERS_PRINTED==0;
	   il=il+1; filenew(il)=pubs(n); 
	end     
    if strmatch(str_start,pubs{n})
      for np=1:length(file);
       il=il+1; filenew(il)=file(np);
	  end
	  PAPERS_PRINTED=1;
    end     
    if strmatch(str_stop,pubs{n}); 
	  il=il+1; filenew(il)=pubs(n); 
	  PAPERS_PRINTED=0; 
	end     
end


web_write_cell_to_file(filenew, htmlfile_new, 'w')

return
	
	
	
% WEB Strings
function str=StringNORMAL(rec, count)
cmsp=', ';
cmcl=': ';
cmp='. ';
count=[num2str(count),cmp];
str=[count,rec.authors{1},cmsp,rec.year{1},cmcl,rec.title{1},cmp,rec.journ{1},cmsp,rec.cit{1},cmp];
return