MATLAB对文件进行批量重命名

http://blog.sciencenet.cn/blog-412191-615814.html

对文件夹中所有文件重命名

但是此程序只能对当前目录下的文件进行转换（？）

clear all
clc
filename=uigetfile('*.*', 'MultiSelect', 'on');
for i=1:length(filename)
oldname=filename{i};
newname=['PR' filename{i}(1:3) '_' filename{i}(5:end)];<span style="color: rgb(51, 102, 153); font-family: Monaco, Consolas, 'Lucida Console', 'Courier New', serif; line-height: 21.6000003814697px;"> % newname是绝对不能有路径的</span>
[status,result]=system(['rename'  ' ' oldname  ' ' newname]);
if status==0
disp(['Rename ' oldname ' sucessfully!'])
else
disp([oldname ' Error!'])
end
end

接下来的这段代码可以转换各个文件夹下的文件
http://www.ilovematlab.cn/thread-438167-2-1.html

clear
clc
[filename, pathname, filterindex] = uigetfile( ...
{
%  '*.mat','Models (*.mat)'; ...
'*.*',  'All Files (*.*)' }, ...
'Pick the image files', ...
'MultiSelect', 'on');
if ischar(filename)
filename = {filename};
end
for i=1:length(filename)
oldname = [pathname filename{i}];
% select=[15:27,29];
select=[1];

if( strcmp(filename{i}( length(filename{i})-3:end),'.gif')==1 )
        subject = filename{i}(1:9);
        middle = filename{i}(11: length(filename{i})-4 );
    else
        subject = filename{i}(1:9);
        middle = filename{i}(11: length(filename{i}) );
    end
    if(isempty(middle))
        newname = strcat(subject, middle, '.bmp');
    else
        newname = strcat(subject,'_', middle, '.bmp');
    end
% newname = [filename{i}(1) '.mat'];
% 此处是第一处错误，zype1128指出
% newname是绝对不能有路径的
cmd=['rename ',oldname,' ', newname];
status = system(['rename ',oldname,' ', newname]);
% 此处是第二处错误，版主kaaaf123指出
% 系统命令应该是rename oldname newname
% 注意空格
if status==0
disp(['文件 '  oldname  ' 重命名成功'])
else
disp(['文件 ' oldname  ' 重命名失败'])
end
end