原来我已经有了一个演示。请看附呈。
%从一个文件夹中所有文件拷贝到另一个文件夹。
clc;%清除命令窗口。
工作空间;%确定工作区面板显示。
格式紧凑的;
%定义输入和输出文件夹。
%改变这些文件夹的名字! ! ! ! ! !
inputFolder = pwd;
outputFolder = uigetdir (pwd);
如果比较字符串(outputFolder inputFolder)
errorMessage = sprintf (的错误:输出文件夹必须不同于输入文件夹的);
uiwait (warndlg (errorMessage));
返回;
结束
%查看这两个文件夹存在。
如果~ isdir (inputFolder)
errorMessage = sprintf (的错误:以下输入文件夹不存在:\ n % s的,inputFolder);
uiwait (warndlg (errorMessage));
返回;
结束
如果~ isdir (outputFolder)
errorMessage = sprintf (的错误:以下输出文件夹不存在:\ n % s的,outputFolder);
uiwait (warndlg (errorMessage));
返回;
结束
%得到的文件复制一个列表。
filePattern = fullfile (inputFolder,“* *”。);%的所有文件。
% filePattern = fullfile (inputFolder * m);% m-files。
fileNamesToTransfer = dir (filePattern);
numFiles =长度(fileNamesToTransfer);
%的复制。
为k = 1: numFiles
%的基础文件名称。
baseFileName = fileNamesToTransfer (k) . name;
%建立完整的输入和输出文件名。
fullInputFileName = fullfile (inputFolder baseFileName);
fullOutputFileName = fullfile (outputFolder baseFileName);
流(1,“现在复制文件# % d % d: % s % s \ n”,…
k numFiles fullInputFileName fullOutputFileName);
拷贝文件(fullInputFileName fullOutputFileName);
结束
uiwait(对话框(“文件复制完成!”,“模态”));
