由cell产生html表格

function genetable(filename,var,f)
% 由cell产生html表格
if ~exist('f','var')
    if exist([filename,'.txt'],'file')
        disp('该文件已存在！')
        a=input('是否覆盖？\n','s');
        if a~='y'
            return
        end
    end
end
[r,c]=size(var);
fileID = fopen([filename,'.txt'],'w');
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% table begin
fprintf(fileID,'[size=4]截止 %s 论坛积分排名情况[/size] \r\n',datestr(date,'yyyy-mm-dd'));
fprintf(fileID,'[table=50%%]\r\n');
%% frist line
horihead=['[tr][td]排名[/td]',...
    '[td]用户名[/td]',...
    '[td]积分[/td]',...
    '[td]ID[/td]',...
    '[td]注册日期[/td][/tr]\r\n'];
fprintf(fileID,horihead);
%% table
for k=1:r
    fprintf(fileID,'[tr][td]%s[/td]',num2str(k));
    fprintf(fileID,'[td][url=http://www.ilovematlab.cn/?%s]%s[/url][/td]',var{k,[3 1]});
    for kk=2:c
        fprintf(fileID,'[td]%s[/td]',var{k,kk});
    end
    fprintf(fileID,'[/tr]\r\n');
end
%% last line
fprintf(fileID,'[/table]');
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%5
%%
fclose(fileID);
cyfile / Matlab-base-toolbox

由cell产生html表格 #2
