How can I read web page on-line with this code? Reply me pls

2 次查看（过去 30 天）

Logan Harvey 2014-7-18

0
链接

此问题的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/142351-how-can-i-read-web-page-on-line-with-this-code-reply-me-pls

评论： Jan 2016-12-20

clear all; clc;
%strContents = fileread('008.html');
files = dir('*.html');
%hits = findstr(File,'services');
filename = 'FULLTEXT21.xlsx';
Sheet = 1;
xlRange = 'B135:B550';
for i = 1:435
    %eval(['load ' files(i).name ' -ascii']);
    expr ='<(title).*?>.*?</\1>';
    strContents = fileread((files(i).name));
    [tok mat nam] = regexpi(strContents, expr, 'tokens', 'match', 'names');
    t = regexprep(mat,'<.*?>', '');
    %abc(1,i)=t; 
    %fprintf('\n\n \t\ti=%d\n\n',i);
      %pattern = '<title>';
      %k =  strfind(t, pattern);
      %for i = 1:131
      %data = load(matfile(i).name);
      %matfbciles = dir(fullfile('D','Matlab Files','Matlab Tutorial','course-cotrain-data','fulltext','course', '*.html'));
      %str = strcat('D:\Matlab Files\Matlab Tutorial\course-cotrain-data\fulltext\course', int2str(i),'.html');
      %use our logic here
      %before proceeding to the next file
      %save pgdb matfiles;
      %filetext = fileread(matfiles(1).name);
      %xlswrite(filename,t,Sheet,xlRange);
      xlsappend(filename, t, Sheet);
      %save firefly.txt
  end;